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1 Die C’T KAT-Ce 


Die M68000 CPU von Motorola gehört zu den leistungsfähigsten Mikroprozessoren, 
die derzeit erhältlich sind. Um an dem daraus resultierenden Fortschritt teilzuhaben, 
mußten Sie in der Vergangenheit ein komplettes Systern kaufen und dafür auf den 
Urlaub verzichten. Für die meisten Computerbesitzer bedeutet es außerdem, auf dem 
Schreibtisch einen weiteren Rechner mit Monitor, Tastatur, Laufwerken usw. unterbrin- 
gen zu müssen. Eine Ablösung ist meistens nicht möglich, denn die fehlende Kompati- 
bilität würde einen Verlust der vielen schönen Programme bedeuten (auch wenn sie 
längst nicht alle gebraucht werden: it's nice to have). 
Mit der Entwicklung der C’T CAT-Ce wurden diese Probleme elegant umgangen. Durch 
die kompromißlose Auslegung einerseits und die Beschränkung auf das Erforderliche 
andererseits, ist es gelungen, einen Rechner herzustellen, der die volle Rechenleistung 
der M68000 CPU entfesselt. So wurde der Datenbus über die volle Breite von 16 Bit 
realisiert und die statischen RAMs benötigen keine Wartezyklen. Die verwendeten 
Schnittstellen-IC’s wurden speziell für die 68000-Familie entwickelt und ermöglichen, 
die enorme CPU-Leistung gebührend an den Mann zu bringen. 
Für Spezialisten ist noch eine Analog-Schnittstelle nachrüsibar. Nach Einlöten zweier 
Sockel und einiger Kleinteile kann die Platine mit zwei weiteren ICs bestückt werden. 
Sie erhalten dann zusätzlich einen AD-Eingang und einen DA-Ausgang. 
Insgesamt hat die C’T KAT-Ce folgende Schnittstellen: 

drei parallele Ports zu je 8 Bit, wovon 2 zu einem 16 Bit Port gekoppelt werden 

können. Die Datenrichtung ist bitweise wählbar. 

zwei V24-Schnittstellen deren Baudrate per Software einstellbar ist. Es sind 

Übertragungsgeschwindigkeiten von 300 bis 38400 Baud möglich. 

optional ein AD-Eingang und ein DA-Ausgang. Die Auflösung beträgt je8 Bit und 

die Wandlerzeit liegt bei 14 Mikrosekunden. 

eine Expansionsschnittstelle zum direkten Anschluß von weiteren Schnittstel- 

len. 
All dies wurde möglich, weil das gesamte vorhande Computersystem weiter benutzi 
wird. Mit Hilfe einer schnellen Rechnerkopplung und eines von C’T gelieferten Pro- 
gramms wird Ihr Computer zum intelligenten Terminal umfunktioniert. Wenn Sie die bei- 
liegende Diskette booten, werden Sie einen völlig neuen Rechner erleben. 
Damit die Programmierung gleich beginnen kann, haben wir ein dickes Softwarepaket 
mitgeliefert. Suchen sie es nicht, es steckt bereits in den ROMs auf der KAT-Ce Platine. 
Lange Diskettenzugriffe sind also nicht erforderlich. Nach dem Booten erwartet Sie der- 
Monitor mit vielen leistungsfähigen Kommandos und nützlichen Routinen. Ein komfor- 
tabler Editor und ein schneller Assembler stecken ebenfalls in diesen beiden IC’s. 
Wenn Sie komplexe Steuerungsaufgaben vorliegen haben, können Sie mit unserem 
System zunächst die Software entwickeln und dann die C'T KAT-Ce als Prozessrechner 
einsetzen. Wenn’s nötig ist, auch als völlig autarkes System (aber bitte mit Netzteil). 
Sollte die C’T KAT-Ce Ihnen noch nicht schnell genug sein, eine kleine Reserve gibt es 
noch. Durch den Austausch von einigen Bauteilen sind noch 25% Geschwindigkeit 
drin. 
Die Hard- und Software haben wir über längere Zeit sorgfältig getestet. Sollten Sie den- 
noch einen Fehler finden, bitten wir um eine formlose aber präzise Fehlermeldung. Wir 
werden den Fehler dann so schnell wie möglich beheben. Eine Haftung für Schäden, die 
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durch die Fehlfunktion unseres Produktes entstehen, können wir leider nicht überneh- 
men. 

Für betriebsbereit gelieferte Computer leisten wir ein halbes Jahr lang Garantie. In die- 
ser Zeit reparieren wir alle Defekte, die bei sachgemäßer Anwendung des Rechners an 
diesem entstehen. Die Garantie erlischt, wenn unzulässige Eingriffe, insbesondere mit 
dern Lötkolben, vorgenommen werden. 


im Juli 1986 M.T. Himmeröder 


2.1 Spannungsversorgung und Anschluß des KAT-CE 


Die C’T KAT-Ce benötigt zum ordnungsgemäßen Betrieb folgende Spannungen: 


+ 5Volt +/- 5% 0,7 Ampere 
+12 Volt +/-10% 50 Milliarnpere 
-12 Volt +/-10% 50 Milliampere 


Um die C’T KATCe anzuschließen, legen Sie bitte die Platine mit der Bestückungsseite 
nach oben auf eine nichtleitende Unterlage (HÖR ZU) und drehen sie so, daß die große 
V24-Buchse rechts oben und die CPU M68000 links unten liegt. Die Spannungsan- 
schlüsse finden Sie dann am oberen Rand der Platine über dem rechten RAM-Baustein 
6264/43256. 
Die 10 Lötstifte haben von links nach rechts folgende Bedeutung: 

+5V Masse +5V Masse +5V Masse +5V Masse +12V -12V 
Schließen Sie hiervon mindestens die vier rechten Stifte an, die anderen bei einem 
erhöhten Strombedarf (Expansionsschnittstelle). 
Unter gewissen Bedingungen ist ein Betrieb mit nur +5 Volt zulässig. Ohne Einschrän- 
kungen funktioniert dies, wenn der AD-Wandler und die seriellen Schnittstellen gar nicht 
benötigt werden. Ist hingegen die Kabellänge zwischen der C'T KAT-Ce und der korre- 
spondierenden Schnittstelle nicht größer als 5 Meter und sind in dieser Empfangsbau- 
steine vom Typ 1489 oder 75189 eingesetzt, so können die seriellen Schnittstellen — 
aber nicht der AD-Wandler - wie folgt genutzt werden: 
Tauschen Sie auf dem Bord der C’T KAT-Ce die beiden Sendebausteine mit der 
Bezeichnung 1488 oder 75188 gegen TTL-IC’s vom Typ 741LS00 aus und verbinden Sie 
die Anschlüsse für +12 Volt und -12 Volt mit +5 Volt. Die Pegel entsprechen dann zwar 
nicht mehr der RS 232 Definition, aber es funktioniert bis 19200 Baud fehlerfrei. Höhere 
Übertragungsraten haben wir noch nicht ausprobiert. 
Soli die Verbindung mit dem Terminalrechner über eine serielle Schnittstelle erfolgen, 
so geschieht dies über die Buchse „SERIELL 1". Die Pinbelegung dieser 25 poligen V24- 
Buchse entspricht der Norm (Siehe Pinbelegung der Schnittstellen 5.8.4). 
Rechts von den Anschlüssen für die Spannungsversorgung liegen die beiden Stifte für 
die Reset-Taste. Schließen Sie hier einen Taster an, der im Normalzustand (also unge- 
drückt) offen ist. 


2.2 Verbindung mit dem APPLE II 


Falls Sie die C’T KAT-Ce von Ihrem APPLE aus mit UCSD-Pascal betreiben wollen, 
benötigen Sie das Programm KATCE.CODE. Sie finden es auf der mitgelieferten Dis- 
kette. Für die ersten Gehversuche hat es sich als praktisch erwiesen, eine bootfähige 
Diskette zu erstellen und mit dieser alle Funktionen in Ruhe zu testen. Für diesen Zweck 
erstellen Sie bitte eine Diskette mit folgendem Inhalt: 

SYSTEM.PASCAL 

SYSTEM.MISCINFO 

SYSTEM.APPLE 

SYSTEM.FILER 
Übertragen Sie auf diese Diskette noch das Programm KATCE.CODE. Wenn Sie möch- 
ten, daß das Terminalprogramm nach dem Booten automatisch gestartet wird, ändern 
Sie den Namen bitte in SYSTEM.STARTUP. Sie werden dann nach dem Einschalten 
des Rechners vom Hauptmenü der C’T KAT-Ce begrüßt. 
Der FILER ist natürlich nicht lebensnotwendig, aber recht praktisch bei der Überprüfung 
der Diskette. 


Nun zur Hardware ... 


Bevor Sie das Gehäuse des APPLE öffnen, bitte unbedingt den Rechner und die übrige 
Peripherie ausschalten. 

Deponieren Sie das serielle Interface in Slot 2 und verbinden Sie dann das Kabel der 
Schnittstelle mit der C’T KAT-Ce. Falls Sie das Gehäuse Ihres Rechners nicht täglich 
öffnen: Die 16K Karte steckt, von der Tastatur aus gesehen, ganz links in Slot 0. Dann 
kommt in der Regel das Printer-Interface und dann Slot 2. 

Der Anschluß des Netzteils sollte, wie im betreffenden Kapitel beschrieben, bereits 
erfolgt sein. 

Und nun die C’T KAT-Ce einschalten, Diskette einlegen, Augen schließen und Rechner 
einschalten .... 

Nach einigen Sekunden sollte das Hauptmenü auf dem Schirm stehen. 
Durchgeschlagene Sicherungen, Stichflammen und Qualmwolken deuten auf einen 
Fehler. Daß Sie bei der Installation der Schnittstelle nicht viel falsch machen konnten, 
sollten Sie im Fehlerfall die Aufmerksamkeit auf die Spannungversorgung der C'T KAT- 
Ce lenken. Mehr dazu im Absatz 5.5 ... läuft nicht, was nun. 

Für PRODOS-Besitzer haben wir eine besonders elegante Anschlußmöglichkeit ent- 
wickelt. Wenn Sie keine serielle Schnittstelle haben, kaufen oder löten Sie sich das in 
der Zeichnung angegebene Kabel und schließen es am Game V/O Connector des 
APPLE an. Wenn Sie alles richtig gemacht haben, erscheint, nach dem Booten von 
PRODOS und dem Start des Terminalprogramms, das Hauptmenü. Wählen Sie 
zunächst 'D’ und geben Sie dann Ihre Schnittstelle für die C’T KAT-Ce an. Definieren Sie 
im nächsten Menü noch das Druckerinterface und lassen Sie dann die Angaben mit '1' 
auf die Bootdiskette speichern. Danach sind Sie wieder im Hauptmenü und können nun 
mit 'K’ die C'T KAT-Ce starten. Künftig brauchen Sie sich um die Schnittstellen nicht 
mehr zu kümmern. 

Über das Hauptmenü können Sie mit einen kleinen Trick auch den PRODOS-Filer auf- 
rufen. Geben Sie 'F' und warten Sie bis der Filer von der Diskette geladen ist. Da der Filer 


4 


mit der 40 Zeichendarstellung arbeitet, müssen Sie dann mit Reset die 80 Zeichen- 
Karte verlassen. Keine Angst, der Filer verdaut das Reset ohne Probleme. Im Filer ange- 
langt, werden Sie von Menü zu Menü weitergereicht. Alles selbstredend! 
Das PRODOS-Terminalprogramm läßt auch die Definition eigener Kommandos und 
Treiberroutinen zu. Auf $202F steht die Endadresse des Programms, danach beginnt 
der freie Bereich. Auf $2003 steht ein JMP zum Einschleifen selbstgefertigter Komman- 
dos. Der jeweilige Kommando-Code, siehe hierzu 4.6, ist im Akku vorhanden. 
Ab $2007 beginnt die Adressleiste für die Treiberroutinen. Sie hat folgenden Inhalt 
(Low-Byte vorweg): 
Adresse der Routine 

$2007: Initialisierung der seriellen Schnittstelle 

$2009: Empfangsroutine für die serielle Schnittstelle 

$200B: Senderoutine für die serielle Schnittstelle 

$200D: Initialisierung der Druckerschnittstelle 

$200F: Senderoutine der Druckerschnittstelle 

$201 1: Initialisierung der Vidioausgabe 

$2013: Videoausgabe 

$2015: 80 Zeichenkarte abschalten 
Wenn Sie hier die Adresse Ihrer eigenen Treiberroutine eintragen, wird künftig diese 
durchlaufen. 
Zur Dateiorganisation unter PRODOS siehe 4.5 


APPLE-PRODOS-Kabel 


APPLE Game C'T KAT-Ce 
Connector Sub-D-Stecker 
Pin IC 1489 Pin 


>2 


2.3 Verbindung mit COMMODORE C 64 


Der C 64 wird an eine C'T KATCE über den Userport des C 64 und Port Bder C’T KATCE 
angeschlossen. Achen Sie darauf, daß die Eproms der C’T KATCE für parallele Verbin- 
dungen vorgesehen sind. 
Laden Sie folgendes File von der Diskette: 
LOAD „KAT-CE",8,1 
Anschließend wird das Terminalprogramm durch SYS 30000 gestartet. 
Auf der Diskette werden die KATCE-Files mithilfe der Subdirectory KAT-CE/DIREC- 
TORY verwaltet. Das Terminalprogramm legt dieses Subdirectory an, wenn es noch 
nicht auf der Diskette vorhanden ist. Die von der KATCE erzeugten Files können nur 
durch das Terminalprogramm bearbeitet oder auch angesehen werden. Filenamen dür- 
fen bis zu 15 Zeichen lang sein, sie werden automatisch in Großbuchstaben überführt. 
Verbindungskabel: 
Userport unten Port BKATCE 
an 7 
an 5 
an 12 
an 4 
11 
an 3 
an i0 
an 2 
10 an 9 
Beidem Commodore C-64 fehlt eine ESC-Taste, drücken Sie stattdessen CTAL-Eckige 
Klammer auf. Außerdem erzeugt die LINKS-PFEIL-Taste einen falschen Code. Benut- 
zen Sie CTRL-H, wenn Sie z.B. Eingabezeilen korrigieren wollen. 


oannoaon2w@— 
mw 
>] 


2.4 Verbindung mit dem GEPARD 


Beim GEPARD ist die Sache ganz einfach, vorausgesetzt Sie haben eine Parallel-/ 
Seriell-Interface-Karte vom Typ PS2. Das erforderliche Kabel und das Zwischenstück 
können Sie selbst anfertigen oder bei der Firma Himmeröder bestellen. Wenn Sie es 
selbst machen, benötigen Sie einen 26 poligen Pfostenfeldstecker mit Schneidklem- 
manschluß, ca. einen Meter 25 poliges Flachbandkabel und eine 25 polige Sub-D- 
Buchse (RS232/V24), ebenfalls mit Schneidklemmanschluß. 

Klemmen Sie den Pfostenfeldstecker und die Sub-D-Buchse so an, wie in der Zeich- 
nung gezeigt und verbinden Sie das Kabel mit der Schnittstelle ’Seriell 2’, das ist It. 
Bestückungsplan der Baugruppe der Anschluß J6. Achten Sie darauf, daß das Kabel- 
nach der Montage zum Baugruppenstecker zeigt (so wie die Pfeile auf dem Bestük- 
kungsdruck angeben). 

Für das Zwischenstück benötigen Sie zwei 25 polige Sub-D-Stecker. Diese sind wie 
folgt miteinander zu verbinden: 
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Pin Pin 
Txo 2 mit 3 RxD 
Red 3 mit 2 T=D 
ats A4mit 5 crı 
ert 5 mit 4 An 
4 7mit 7 4 
Deo 8 mit 20 orR 


OTR 20 mit 8 dio 
Mit zwei 20 mm Distanzhülsen und zwei 30 mm Schrauben (M3) lassen sich die beiden 
Stecker zu einer kompakten Einheit zusammenschrauben. 
Das Terminalprogramm finden Sie auf der Diskette. 


Verbindungskabel GEPARD <--> C'T KAT-Ce 


Pfostenfeldstecker Sub-D-Buchse 
26 polig 25 polig 
von unten gesehen von oben gesehen 


bleibt frei Pin 25 


Flachbandkabel, 25 polig 


Pin 1 


2.5 Verbindung mit CPM-Rechnern 


Bei der Vielfalt der CPM-Rechner können wir keine konkreten Anschlußpläne vorlegen. 
Für den PROF 80 haben wir eine laufende Version des Terminalprogramms vorliegen 
und stellen Innen den Source-Code auf Anforderung gerne zur Verfügung. Einen ver- 
sierten Gesprächspartner können wir bei Bedarf vermitteln. 


3 Aufteilung des Adressraumes 


Direkt nach dem Einschalten und nach jedem Reset werden ab Adresse $0 die ROMs 
mit den Sprungvektoren, dem Monitor und dem Editor / Assembler eingeblendet. 
Sobald die CPU den Stackpointer geladen hat und mit der Ausführung des Programms 
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beginnen will, erfolgt dann eine Umschaltung der Speicherbereiche. Die ROMs werden 
nach $800000 verschoben und die RAMs sind ab $0 erreichbar. Das Initialisierunspro- 
gramm kopiert dann zuerst die Vektoren ab $0 ins RAM. Sinn dieser recht komplizierten 
Anlaufprozedur ist es, die Vektoren mit einfachen MOVE-Befehlen ändern zu können. 
Der RAM-Bereich beginnt also beim Ablauf eines Programms immer an der Adresse $0. 
Mit der empfohlenen Mindestausstattung von vier 6264-RAMs, endet der RAM bei 
$7FFF. Über mögliche andere RAM-Bestückungen gibt Abschnitt 5.2 Auskunft. 
Serienmäßig beträgt die ROM-Größe der C'T KAT-Ce 16K Worte, aufgeteilt auf zwei 
27128 ROMs von je 16K Bytes. Falls Ihnen diese ROMs nicht gefallen, vielleicht möch- 
ten Sienoch einige Routinen ergänzen, gibt Abschnitt 5.2 hierzu weitere Informationen. 


Die Register des Port-Bausteins MC68230 beginnen bei $400001 und die Register des 
‘Doppel-UART’ (DUART) MC68681 bei $402001. 
Der Expansionsport ist unter $C00001 bis SCO3FFF zu erreichen. Da er nur byteweisen 
Datenverkehr zuläßt, dürfen nur ungerade Adressen angesprochen werden. Näheres 
hierzu in Abschnitt 5.1. 
Der AD-Wandler und der DA-Wandler belegen die Adressen SC04000, $C08000 und 
$COCOOO. 
Um die hardwaremäßige Aufteilung des Adressraumes einfach und schnell zu halten, 
wurden die Adressleitungen nur soweit wie erforderlich dekodiert. Dies hat zur Folge, 
daß die Speicher und Peripherie-Register auch unter anderen Adressen als den ange- 
gebenen zu erreichen sind. Genaueres hierzu unter 5.2. 
Die Aufteilung des Adressraumes als Übersicht: 
RAM-Speicher 2X 6264: $000000 bis $OO3FFF 
4.X 6264: $000000 bis $0O07FFF 
2X 43256: $000000 bis $OOFFFF 
4x 43256: $000000 bis $OIFFFF 


parallele Schnittstelle $400001 bis $400035 
serielle Schnittstelle $402001 bis $40201F 
EPROM-Speicher 2732: $800000 bis $BO1FFF 


2764: $800000 bis $BOIFFF 
27128: $800000 bis $807FFF 
27256: $800000 bis $8OFFFF 
27512: $800000 bis $81FFFF 


Expansionsschnittstelle $C00001 bis $CO3FFF 
Digital-Analog-Wandler $C04000 
Analog-Digital-Wandler $C08000 und $COCO00 


4.1 Das Hauptmenü 


Wenn die hardwaremäßige Verbindung der C’T KAT-Ce mit dem Terminalrechner kor- 
rekt funktioniert, erscheint das Hauptmenü auf dem Bildschirm unter folgenden Bedin- 
gungen: 


1. nach dem Einschalten der Stromversorgung der C’T KAT-Ce (Power on Reset) und- 
Start des Terminalprogramms im Terminalrechner. 

2. nach Rücksetzen der C’T KAT-Ce (event. mehrfachem Drücken der Reset-Taste). 

3. nach Beendigung eines Programms, welches vom Hauptmenü aus mit Xecute oder 

Run, oder nach einer Übersetzung vom Assembler aus gestartet wurde. 

4. nach Beendigung des Editors oder des Assemblers, sofern keine andere Anweisung 
gegeben wurde. 

5. wenn Sie den Monitor mit Q CR bedienen. 

Unter der Kopfzeile des Hauptmenüs wird der RAM-Anfang und der Beginn des Asse- 

mbler-Codes angezeigt. Beide Größen werden vom Monitor anhand der RAM-Größe 

errechnet. 

Im Hauptmenü können Sie folgende Kommandos geben: 

E Start des Editors. 

Der RAM-Inhalt ist ohne Bedeutung und geht verloren. 

W Start des Editors. 

Ein im RAM vorhandener Text kann weiter bearbeitet werden. 

M Aufruf des Monitors. 

X Xecute/Ausführen eines Programms, das als Object-Code auf der Diskette gespei- 
chert ist. Nach der Eingabe von X wird der Programmname erfragt. Ermuß den Kon- 
ventionen des Betriebssystems im Terminalrechner genügen. Programmlänge, 
Lade- und StartAdresse müssen am Beginn der Datei hinterlegt sein. Dies ist 
gewährleistet, wenn die Datei mit dem Monitorkommando SAVE erstellt wurde. 

A Aufruf des Assemblers. 

Der im RAM vorhandene Text wird Source-Code interpretiert und übersetzt. Der Text 
muß sich im Arbeitsbereich des Editors befinden. 

R Ein im RAM vorhandenes Programm wird gestartet. 

Der Editor-Assembler ermöglicht es dem Anwender, den Source- und Object-Code 
kleinerer Programme speicherresident zu halten und somit ständig zwischen Editor, 
Assembler und dem zu testenden Programm hin und her zu springen, ohne daß lang- 
wierige Diskettenzugriffe notwendig werden. Bedingung hierfür ist, daß das Pro- 
gramm nicht segmentiert ist und an der vom Monitor bestimmten Startadresse 
(CODESTART) beginnt. Der Quell-Code des Programms darf also weder eine ORG- 
noch eine CHAIN-Anweisung enthalten. 

Q Die Kontrolle wird an das Betriebssystem des Terminalrechners zurückgegeben. 


4.2 Der Monitor 


Der Monitor bildet zusammen mit dern Programm im Terminalrechner das Betriebssy- 
stem der C’T KAT-Ce. Der Monitor enthält alle Routinen, die für den Datenverkehr mit 
dern Terminalrechner erforderlich sind, sowie die Routinen, die für ein effektives Entwik- 
keln und Testen von Programmen gebraucht werden. Eine Beschreibung der realisier- 
ten Kommandos und Routinen finden Sie im weiter hinten. Wenn Sie einen Rechner 
kennen, dessen Monitorroutinen direkt angesprungen werden (z.B. APPLE), kennen Sie 
auch die daraus resultierenden Probleme. Fehlerbeseitigung und Verbesserung dieser 
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Routinen ist ohne Rückwirkung auf die Programme des Anwenders nicht möglich. Um 
diese Schwierigkeiten gar nicht erst aufkommen zu lassen, werden in der C’T KAT-Ce 
alle Routinen über eine Sprungliste adressiert. Diese ist am Beginn des Adressraumes, 
direkt hinter den hardwaremmäßig ausgewerteten Vektoren eingerichtet unddamit sicher 
vor Verschiebungen. 

In den ersten 256 Bytes, also im Adressraum $00 bis $FF, sind die Adressen hinterlegt, 
die der Prozessor beim Auftreten einer Ausnahmesituation auswertet. Mit Hilfe dieser 
Technik ist es möglich, auf fast alle Unregelmäßigkeiten per Programm zu reagieren. 
Wird z.B. in einern Programm durch Null dividiert, so erkennt der Prozessor den Fehler 
und führt die Routine aus, deren Adresse in $14 steht. 

Wenn Sie nun nicht wollen, daß Ihr Programm bei einer Division durch Null beendet wird 
und Sie andererseits auch nicht jeden Divisor prüfen wollen, so können Sie den Adres- 
spointer in $14 auf Ihre eigene Fehlerroutine „verbiegen“. 

Etwaso: MOVE.L #DIVNULL,$14 ;Adr.(DIVNULL) 9 $14 

Eine Besonderheit stellt in diesem Zusammenhang der Befehl TRAP #n dar. Er erlaubt 
es, sozusagen per Software, einen Ausnahmezustand zu erzeugen. 

Für TRAP #0 bis TRAP #15 sind die Adresszeiger in S80 bis $BF hinterlegt. Zwei dieser 
TRAPS sind bereits voreingestellt. Durchläuft ein Programm den Befehl TRAP #1, so 
wird die TRACE-Routine eingeschaltet. TRAP #0 schaltet sie wieder aus. Man erreicht 
so, daß nur die interessanten Befehle auf dem Schirm erscheinen und nicht die übrigen 
vielen Millionen. Natürlich können Sie auch die diesen TRAPs zugeordneten Sprünge 
umleiten, nur mit dem partiellen TRACE ist es dann vorbei. Mehr zum TRACE beim ent- 
sprechenden Monitorkommando. 


4.2.1 Die Monitor-Kommandos 


DISPLAY ANF-Adresse . END-Adresse CR oder 
ANF-Adresse X Anzahl CR 
Der durch ANF-Adresse . END-Adresse oder ANF-Adresse X Anzahl 
definierte Bereich wird als Tabelle in HEX und ASCII angezeigt. Jeweils 
8 Worte sind in einer Zeile wie folgt zusammengefaßt: 
Adresse: HEX-Wort HEX-Wort ... ASCII 
Ein Punkt bedeutet, daß das jeweilige Byte als ASCII-Zeichen nicht 
darstellbar ist. Die Ausgabe kann mit einer beliebigen Taste angehal- 
ten, dann mit CTRLC beendet oder mit jeder anderen Taste fortgesetzt 
werden. Die Adressen müssen gerade sein. 

REGISTER RCR 

DISPLAY Es werden die Inhalte der Register in HEX angezeigt, die mit dern Kom- 
mando OUTPUT CONTROL ausgewählt wurden. Erfolgte diese Aus- 
wahl nicht, werden die Register DO bis D7 und AD bis A7 angezeigt. Die . 
letzte Zeile enthält den Inhalt des Status-Registers. 

CHANGE ANF-Adresse: HEX-Wort HEX-Wort .... CR 
Die angegebenen HEX-Werte werden ab ANF-Adresse wortweise im 
Speicher abgelegt. Als Trennzeichen zwischen zwei Worten ist ein 
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MOVE 


VERIFY 


SPACE anzugeben. Sind mehr als 4 HEX-Zeichen für ein Wort angege- 
ben, so gelangen nur die letzten 4 in den Speicher. Sind weniger als 4 
HEX-Zeichen für ein Wort angegeben, so werden diese im Wort rechts- 
bündig abgelegt. Die führenden Nibble enthalten in diesem Fall Nullen. 
Die Adresse muß gerade sein. 

ANF-Adresse . END-Adresse M ZIEL-Adresse CR 

Der Bereich von ANF-Adresse bis END-Adresse einschl. wird wort- 
weise in den Bereich ab ZIEL-Adresse übertragen. Alle 3 Adressen 
müssen gerade sein. 

ANF-Adresse . END-Adresse V VRY-Adresse CR 

Der Bereich von ANF-Adresse bis END-Adresse einschl. wird wort- 
weise mit dem Bereich ab VRY-Adresse verglichen. Unterschiede wer- 
den als Tabelle von 

Adresse:lnhalt Adresse:Inhalt 

angezeigt. CTRL C beendet die Ausgabe vorzeitig. Alle 3 Adressen 
müssen gerade sein. 


DISASSEMBLE ANF-Adresse ZCR oder 


START 


TRACE 


OUTPUT 
CONTROL 


ANF-Adresse Z+ CR 

Ab ANF-Adresse wird der Speicherinhalt als Programm interpretiert 
und angezeigt. Jeder Befehl wird in einer Zeile der Form 

Adresse: Befehl Operand Object-Code ASCII 

ausgegeben. Für nicht interpretierbare Befehle erscheint ***** , für nicht 
darstellbare ASCII-Zeichen ein Punkt. Zohne nachfolgendes + bewirkt 
die Ausgabe von 16 Befehlen, Z+ die fortlaufende Ausgabe. Im Falle 
von Z+ kann die Ausgabe mit einer beliebigen Taste angehalten, dann 
mit CTRL C beendet oder mit jeder anderen Taste fortgesetzt werden. 
Die Adresse muß gerade sein. 

ANF-Adresse G CR 

Das Programm im Speicher wird bei ANF-Adresse gestartet. Die 
Adresse muß gerade sein. 

ANF-Adresse TCR 

Das Programm im Speicher wird bei ANF-Adresse gestartet. Fürjeden 
durchlaufenen Befehl wird eine Zeile der Form 

Adresse: Befehl Operand Object-Code ASCIl 

ausgegeben. Ein Punkt bedeutet, daß das jeweilige Byte als ASCII-Zei- 
chen nicht darstellbar ist. Zusätzlich werden die Inhalte der Register in 
HEX angezeigt, die mit dem Kommando OUTPUT CONTROL ausge- 
wählt wurden. Erfolgte diese Auswahl nicht, werden die Register DO bis 
D7 und AO bis A7 angezeigt. Die jeweils letzte Zeile enthält den Inhalt 
des Status-Registers. Nach dem Start befindet sich das Programm im 
Einzel-Step-Modus. D.h. nach jedem Befehl wird auf den Druck einer 
Taste gewartet. CTRLC beendet das Programm, CR löscht den Einzel- 
Step-Modus und jede andere Taste setzt das Programm im Einzel- 
Step-Modus fort. Die Adresse muß gerade sein. 
ODO..Dn..D7A0O..An..A7CR 

Die mit DO bis D7 und/oder AO bis A7 ausgewählten Register werden 
bei TRACE angezeigt. Die Ausgabe der Register erfolgt, unabhängig 
von der Auswahl, immer in aufsteigender Folge (Dn < An). 
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SAVE 


LOAD 


AUSGABE 


RECHNEN 


12 


S Name, ANF-Adresse, Länge CR 

Die Anweisung speichert den Bereich (ANF-Adresse,Länge) in den File 
'Name'. Die explizite Angabe des Laufwerkes kann gemäß den Kon- 
ventionen des jeweiligen Betriebssysterns im Terminal-Rechner erfol- 
gen. ANF-Adresse und Länge werden in zwei L-Worten am Beginn des 
Files gespeichert. Die Adresse muß gerade sein. 

L Name,ANF-Adresse CR oder 

L Name,ANF-Adresse G CR 

Der Inhalt des Files 'Name’ wird ab ANF-Adresse in den Speicher gela- 
den. Wenn die Angabe der Ladeadresse unterbleibt, wird sie, wie die 
Länge, den ersten beiden L-Worten des Files 'Name’ entnommen. 
Nach dem Laden wird die Ladeadresse mit der Meldung 

Anfang bei: Adresse 

angezeigt. Die explizite Angabe des Laufwerkes kann gemäß den Kon- 
ventionen des jeweiligen Betriebssystems im Terminalrechner erfol- 
gen. Die zusätzliche Angabe von '‚G' bewirkt, daß das Programm nach 
dem Laden gestartet wird. In diesem Fall unterbleibt die Anzeige der 
Startadresse. 

PICR,P2CR, P3CR, P4 CRoder POCR 

P1 CR initialisiert Port A. Alle Daten die die C’T KAT-Ce zum Terminal- 
rechner sendet und die dort in der Regel auf dem Bildschirm erschei- 
nen, werden zusätzlich an Port A ausgegeben. Die Initialisierung erfolgt 
so, daß die Anforderungen einer CENTRONICS-Druckerschnittstelle 
erfüllt werden. 

P2 CR veranlaßt, daß alle zum Terminalrechner gesendeten Daten 
auch auf dern Drucker des Terminalrechners ausgegeben werden. 

P3 CR initialisiert die Schnittstelle SERIELL-A. Es handelt sich dabei 
um die aus 10 Pfostenfeldstiften bestehende Schnittstelle unterhalb 
der SUB-D-Buchse. Alle Daten, die die C’T KAT-Ce zum Terminalrech- 
ner sendel, werden zusätzlich an dieser Schnittstelleausgegeben. 
Bevor dieses Kommando gegeben wird, muß in die Speicherstelle 
$301 der zugehörige Baudratenwert eingetragen werden (s.4.2.2 
SERAINIT). 

P4 CR initialisiert die Schnittstelle SERIELL-B. Es handelt sich dabei 
um die 25polige SUB-D Buchse. Alle Daten, die die C’T KAT-Ce zum 
Terminalrechner sendet, werden zusätzlich an dieser Schnittstelleaus- 
gegeben. Bevor dieses Kommando gegeben wird, muß in die Spei- 
cherstelle $300 der zugehörige Baudratenwert eingelragen werden 
(s.4.2.2 SERAINIT). Falls Sie den Hostrechner über diese Schnittstelle 
angeschlossen haben, dürfen Sie das Kommando P4 natürlich nicht 
geben. 

POCR beendet die Druckausgabe. 

? A Operator B 

Die Operanden A und B werden gemäß Operator wortweise miteinan- 
der verknüpft. Zulässig sind + - * und / für die vier Grundrechnungsar- 
ten. Die Operanden A und B werden als HEX-Zahlen ohne Vorzeichen 
interpretiert. Bei der Division wird das Ergebnis in der Form Quotient 
& Rest dargestellt. 


QUIT 


KEYPRESS 
$800110 


BYTEIN 
$800114 


TASTIN 
$800118 


GETSTR 
$80011C 


BYTEOUT 
$800120 


WORDOUT 
3800128 


ASCIOUT 
$800124 


STROUT 
5800134 


OCcR 
Es wird zum Hauptmenü verzweigt. 


4.2.2 Die Monitor-Routinen 


veranlaßt eine Abfrage der Tastatur im Terminalrechner. Wurde ein Zei- 
chen eingegeben, gelangt Eins, anderenfalls Null in das niederwertige 
Byte von DO. Bit 1 bis 31 werden Null gesetzt. Außer DO werden keine 
Register verändert. 


liest ein Byte von der Schnittstelle zum Terminalrechner und übergibt es 
im niederwertigen Byte von DO. Außer DO werden keine Register verän- 
dert. 


liest ein Zeichen von der Tastatur und übergibt es im niederwertigen Byte 
von DO. DasMSB und die Bits 31 bis 8 sind immer Null. Außer DO werden 
keine Register verändert. : 


liest einen String ein und legt ihn an die durch Register A1 bezeichnete 
Stelle im RAM ab. Das erste Byte enthält die Anzahl der eingelesenen Zei- 
chen. Das abschließende CR wird übernommen, ist aber in der Anzahl 
nicht enthalten. Es werden keine Register verändert. 


sendet das niederwertige Byte in DO über die Schnittstelle zum Terminal- 
rechner. Es werden keine Register verändert. 


gibt die beiden Bytes im niederwertigen Wort von DO über das Unterpro- 
gramm BYTEOUT aus. Register DO wird verändert. 


stellt die beiden Zeiger XKOORD und YKOORD und gibt anschließend 
das niederwertige Byte in DO über das Unterprogramm BYTEOUT auf 
dem Bildschirm aus. Die beiden Zeiger geben an, in welcher Spalte 
(XKOORD) und Zeile (YKOORD) das nächste Zeichen auf dem Bildschirm 
angezeigt wird. XKOORD ist unter der Adresse $3AD und YKOORD unter 
der Adresse $3AC zu erreichen; beide Werte sind je ein Byte lang. Der 
Zeiger XKOORD wird nur bei der Ausgabe von CR auf Null zurückgestellt. 
Über die eingestellte Zeilenlänge hinaus ausgegebene Zeichen werden 
ignoriert und gehen verloren. YKOORD bewegt sich immer im Bereich O 
bis 23. Die Ausgabe von CTRL L löscht den Bildschirm und stellt 
XKOORD und YKOORD auf Null. Es werden keine Register verändert. 


gibt eine Zeichenfolge (String) über das Unterprogramm ASCIOUT aus. 
Das erste Byte des Strings muß die Anzahl der auszugebenden Zeichen 
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PRTBYTE 
$80012C 


PRTWORD 
$800130 


CROUT 
$800138 


CLBILD 

$80013C 
PRTCOL 
$800140 
PRTMSP 
800144 


GOTOXY 
5800148 


BELL 
$80014C 


QUIT. 
$80010C 


REWRITE 
$800158 
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enthalten. Die Adresse des 'Strings’ ist in A1 vorzugeben. Die Register 
DO, D1 und A1 werden verändert. Hinweis: Wird eine Zeichenfolge im 
Assembler-Source-Code mit der Anweisung STR definiert, so setzt der 
Assembler dem Text die Stringlänge automatisch voran. 


konvertiert die beiden Nibble im niederwertigen Byte von D1 in HEX-Zei- 
chen und gibt sie über das Unterprogramm ASCIOUT aus. Das Register 
DO wird verändert. 


gibt die beiden Byte im niederwertigen Wort von D1 über das Unterpro- 
gramm PRTBYTE aus. Register DO wird verändert. 


gibt über das Unterprogramm ASCIOUT ein CR und ein LF aus. Das 
Register DO wird verändert. 


gibt über das Unterprogramm ASCIOUT ein CTRL L aus und bewirkt 
damit das Löschen des Bildschirmes. Die Zeiger XKOORD und YKOORD 
werden auf Null gestellt. Das Register DO wird verändert. 


gibt über das Unterprogramm ASCIOUT einen Doppelpunkt aus. Das 
Register DO wird verändert. 


gibt über das Unterprogramm ASCIOUT eine Folge von Blank (Hex 20) 
aus. Im Register D1 ist die Anzahl-1 vorzugeben. Die Register DO und D1 
werden verändert. 


positioniert den Cursor auf dem Bildschirm in Spalte X der Zeile Y. Die 
Vorgabe der Koordinaten erfolgt im niederwertigen Wort von D1. Im 
ersten Byte ist der Wert für Y und im zweiten Byte der Wert für X anzuge- 
ben. X,Y = O stellt den Cursor in die linke obere Ecke. Die Zeiger XKOORD 
und YKOORD (siehe ASCIOUT) werden auf X,Y gestellt. Es werden die 
Register DO und D2 verändert. 


gibt über das Unterprogramm ASCIOUT CTRL-G aus. Ein APPLE-Termi- 
nal z.B. macht dann 'tröööt'. Das Register DO wird verändert. 


JMP QUIT beendet das Programm und gibt die Kontrolle an den Termi- 
nal-Rechner zurück. Falls Sie in der KAT-Ce bleiben wollen, muß das 
Programm mit RTS beendet werden. 


eröffnet eine neue Datei auf der Diskette. Laufwerk und Dateiname wer- 
den gemäß den Konventionen des Betriebssystems im Terminalrechner 
als String (siehe STROUT) definiert. Die Stringadresse ist in Register A1 
vorzugeben. Damit bei den übrigen Diskettenbefehlen nicht immer der 
ganze String untersucht werden muß, wird diesem bei der Dateieröff- 
nung für die Dauer der Bearbeitung eine File-nummer zugeordnet. Die 
Filenummer ist in Register D1 vorzugeben. Die höchste Filenummer ist 
bestimmt durch die Anzahl der Files, die das Betriebssystem im Termi- 


RESETF 
$800154 


BLOCKR 
$80015C 


BLOCKW 
$800160 


CLOSE 
$800164 


CLOSEDEL 
$800168 


IORESULT 
$80016C 


UNITOUT 
$800170 


UNITINIT 
$800174 


DAOUT 
$800178 


ADIN 
$80017C 


PARAINIT 
$800180 


nalrechner gleichzeitig in Bearbeitung halten kann. Die niedrigste File- 
nummer ist Null. Ist auf dem ausgewählten Laufwerk bereits eine Datei 
gleichen Namens vorhanden, wird diese zuvor gelöscht. Es werden die 
Register DO, D2 und A1 verändert. 


eröffnet eine bereits vorhandene Datei auf der Diskette. Die Parameter in 
den Registern Ai und D1 haben die gleiche Bedeutung wie beim Aufruf 
von REWAITE. Es werden die Register DO, D2 und AO verändert. 


liest von der Diskette aus der Datei mit der Filenummer It. Register D1 den 
Block mit der Blocknummer It. Register D5 (wahlfreier Zugriff). Die Daten 
werden im Diskbuffer ab Adresse $100 abgelegt. Die Blocklänge beträgt 
konstant 512 Bytes. Der erste Block einer Datei hat die Blocknummer 
Null. Es werden die Register DO, D2 und AO verändert. 


schreibt einen Block von 512 Bytes in die Datei mit der Filenummer It. 
Register D1. Die Blocknummer in Register D5 gibt an, welchen Platz der 
Block in der Datei erhält (wahlfreier Zugriff). Null bezeichnet den ersten 
Block einer Datei. Die Daten müssen im Diskbuffer ab Adresse $100 ste- 
hen. Es werden die Register DO, D2 und AO verändert. 


schließt die Datei mit der Filenummer It. Register D1 und gibt die im Ter- 
minalrechner für diese Datei belegten Bereiche frei. Es ist notwendig, 
eröffnete Dateien nach Abschluß der Bearbeitung wieder zu schließen. 
Es werden die Register DO und D2 verändert. 


schließt und löscht die Datei mit der Filenummer It. Register D1 und gibt 
die im Terminalrechner für diese Datei belegten Bereiche frei. Es werden 
die Register DO und D2 verändert. 


liefert in Register DO den Return-Code der Disketten-Befehle. Die Fehler- 
nummer ist abhängig vom Betriebssystem im Terminalrechner. Das 
Register DO ist Null, wenn der Befehl fehlerfrei ausgeführt wurde. 


sendet das niederwertige Byte in DO über die Schnittstelle zum Drucker 
des Terminalrechners. Es werden keine Register verändert. 


veranlaßt die Initialisierung des Druckers vom Terminalrechner. Es wer- 
den keine Register verändert. 


gibt das niederwertige Byte in DO über den Digital-Analog-Wandler aus. 
Es werden keine Register verändert. 


startet den Analog-Digital-Wandler und übergibt den Messwert im nie- 
derwertigen Byte von DO. Außer DO werden keine Register verändert. 


initialisiert die parallele Schnittstelle Port A. Alle Datenbits werden als 
Ausgang definiert. Die Leitung H1 wird so geschaltet, daß sie einen 
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PARAOUT 
5800188 


SERAINIT 
$8001A0 


SERAOUT 
$8001A8 


SERAIN 
$8001AC 


SERBINIT 
$8001B0 


SERBOUT 
$8001B8 
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ankommenden Low-High Übergang als Handshake-Signal interpretiert. 
Die Leitung H2 dient zur Erzeugung eines negativen Strobe-Impulses. 
Durch die Ausgabe von CR wird die Gegenseite aufgefordert zur Bestäti- 
gung ein Handshake-Signal auszugeben und damit ihre Empfangsbe- 
reitschaft zu signalisieren. Port A entspricht damit den Anforderungen 
einer CGENTRONICS-Schnittstelle. Das Register DO wird verändert. 


Wenn der Empfang des zuletzt gesendeten Bytes von der Gegenseite 
bestätigt wurde, wird das niederwertige Byte von Register DO über Port 
A ausgegeben. Anderenfalls wird zuvor auf die Bestätigung gewartet. 


Die serielle Schnittstelle SERIELL1 wird für das Übertragungsformat 
STARTBIT, 8 DATENBIT und 1 STOPBIT ohne Parity initialisiert. Die 
Übertragungsgeschwindigkeit (Baudrate) wird im niederwertigen Byte 
vonRegisterD1 für den Sender und Empfänger getrennt eingestellt. Bit 7 
bis 4 sind dem Empfänger und Bit 3 bis O0 dem Sender zugeordnet. Die 
nachfolgende Tabelle zeigt die Codierung der Baudraten. 

Baudrate Code 


75 so 
110 S1 
134.5 s2 
150 S3 
300 54 
600 Ss5 

1200 s6 
2000 s7 
2400 s8 
4800 sg 
1800 SA 
9600 sB 
19200 SC 
38400 SD 


Enthält Register D1 beim Aufruf von SERAINIT z.B. $60, so werden die 
Daten von der C’T KAT-Ce mit 75 Baud gesendet und mit 1200 Baud 
empfangen. Außer D1 werden keine Register verändert. 


Sobald die Schnittstelle SERIELL1 frei ist, wird das niederwertige Byte 


von Register DO anSERIELL1 ausgegeben. Außer DO werden keine Regi- 
ster verändert. 


Von der Schnittstelle SERIELL1 wird ein Byte nach Bit 7 bis 0 in Register 
DO gelesen. Falls noch keine Daten empfangen wurden, wird auf deren 
Eintreffen gewartet. Außer DO werden keine Register verändert. 


Die serielle Schnittstelle SERIELL2 wird initialisiert. Im übigen gelten die 
bei SERAINIT gemachten Angaben. 


Sobald die Schnittstelle SERIELL2 frei ist, wird das niederwertige Byte 


von Register DO an SERIELL2 ausgegeben. Außer DO werden keine Regi- 
ster verändert. 

SERBIN 

$8001BC Von der Schnittstelle SERIELL2 wird ein Byte nach Bit? bis O in Register 
DO gelesen. Falls noch keine Daten empfangen wurden, wird auf deren 
Eintreffen gewartet. Außer DO werden keine Register verändert. 

INITPORTB 

$8001C0 Die parallele Schnittstelle Port B wird zur Datenübertragung in zwei Rich- 
tungen initialisiert: 
Für jede Richtung werden je zwei Leitungen als Datenleitung und zwei 
Leitungen für Handshakesignale definiert. 

READPORTB 

$800104 liest ein Byte von Port B in das niederwertige Byte von Register DO. Falls 
noch keine Daten anstehen, wird auf deren Eintreffen gewartet. Außer DO 
werden keine Register verändert. 

SENDPORTB 

$8001C8 Wenn der Empfang des zuletzt gesendeten Bytes von der Gegenseite 
bestätigt wurde, wird das niederwertige Byte von Register DO über Port 
B ausgegeben. Anderenfalls wird zuvor auf die Bestätigung gewartet. 
Außer DO werden keine Register verändert. 


4.3 Der Editor 


Für die Erstellung von Programmtexten ist in den ROMs ein Fullscreen-Editor enthalten. 
Dieser ist in der Bedienung weitgehend identisch mit dem Editor von TURBO-PASCAL 
und das, obwohl wir ihn ganz neu geschrieben haben. Wenn Sie also WORD-STAR oder 
TURBO-PASCAL bereits kennen, brauchen Sie nicht umzulernen. Kennen Sie nur einen 
Zeilenedititor, werden Sie bald die Vorzüge eines Fullscreen-Editors zu schätzen wis- 
sen. 
Um zügiges Editieren zu gewährleisten, wurde die Textgröße auf den zur Verfügung ste- 
henden RAM-Bereich beschränkt. Denken Sie also rechtzeitig daran, Ihr Programm in 
RAM-gerechte Module zu unterteilen. Mit dem ebenfalls im ROM untergebrachten 
Assembler können Sie dann die einzelnen Module zu einem Programm zusammenfas- 
sen. 
Wenn Sie vom Hauptmenü aus mit E den Editor aufrufen, ist zuerst die Frage 'Datenla- 
den? (J/N)' zu beantworten. 
Wenn Sie mit ) antworten, müssen Sie anschließend den Dateinamen des einzu- 
lesenden Textes angeben. Dieser Name muß Laufwerk und Dateinamen für das 
Programm im Terminalrechner eindeutig spezifizieren. In der C’T KAT-Ce erfolgt 
keine Prüfung des Namens. Ist die Datei auf der Diskette vorhanden, wird der 
Text eingelesen und der Bildschirm zeigt die ersten 23 Zeilen des Textes an. 
Wenn Sie mit N antworten, wird unterstellt, daß ein neuer Text angelegt werden 
soll. Der hierfür vorgesehene RAM-Bereich wird gelöscht und der Editor ist für 
die Eingabe bereit. 
Wenn Sie den Editor vom Hauptmenü aus mit W aufrufen, so wird angenommen, daß 
der zu bearbeitende Text bereits im RAM vorhanden ist und Sie können deshalb sofort 
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mit Editieren anfangen bzw. weitermachen. Sollte noch kein Text im RAM vorhanden 
Sein, reagiert das Programm undefiniert. Ein Systemabsturz kann die Folge sein. 
Die oberste Zeile auf dem Bildschirm ist die Statuszeile. Hier wird angezeigt, obsich der 
Editor im Einfüge- oder im Überschreibmodus befindet. Wenn der Einfügemodus einge- 
schaltet ist, werden alle eingegebenen Zeichen an der vom Cursor bezeichneten Stelle 
eingefügt und der nachfolgende Text wird jeweils um ein Zeichen aufgeschoben. Im 
Überschreibmodus hingegenwerden die Zeichen unter dem Cursor überschrieben. 
Zwischen Einfüge- und Überschreibmodus können Sie mit Control V hin und her schal- 
ten. Beim ersten Aufruf des Editors und nach dem Einlesen eines Textes von der Dis- 
kette ist immer der Einfügemodus eingestellt. 
Mit Control QV kann der Einrückmodus an- und ausgeschaltet werden. Ist der Einrück- 
modus an, beginnt eine neue Zeile immer in der gleichen Spalte wie die vorhergehende 
Zeile. Ist der Einrückmodus aus, beginnt eine neue Zeile immer in Spalte 1. 
Im vorliegenden Editor sind 48 Kommandos realisiert. Diese lassen sich in folgende 4 
Gruppen unterteilen: 
Kommandos für die Cursor-Bewegung 
Kommandos für Einfügen und Löschen 
Kommandos zum Bearbeiten ganzer Textblöcke 
Sonstige Kommandos 
Da für die Bearbeitung eines Textes neben Buchstaben, Ziffern und Sonderzeichen 
noch viele Steuerzeichen erforderlich sind, der Editor aber auch mit bescheiden ausge- 
statteten Tastaturen laufen soll, wurde auf die Benutzung von Cursor-Tasten und dergl. 
verzichtet. Stattdessen wird für die Eingabe von Steuerzeichen mit der Control-Taste 
auf eine zusätzliche Ebene umgeschaltet. Da dann die Beschriftung der Tasten nicht 
mehr mit der Funktion übereinstimmt, macht man sich als Gedächtnisstütze diegeome- 
trische Anordnung der Tasten zunutze. Für die einfache Cursorbewegung sind dies die 
Tasten ESDX.Diese Tasten liegen so, daß sich die aus der Betätigung ergebende Cur- 
sorbewegung von selbst erklärt. Für größere Sprünge, nämlich um ein Wort nach links 
oder rechts, sind die jeweils daneben liegenden Tasten A und F vorgesehen. Über meh- 
rere Zeilen auf und ab geht es dann mit R und C. Noch größere Sprünge werden durch 
dig vorherige Eingabe von Control Q ausgelöst. S und D bewegen dann den Cursor zum 
Zeilenanfang bzw. Zeilenende und R und C zum Dateianfang bzw. Dateiende. 
Control J und | veranlassen einen Tabulatorsprung nach links bzw. rechts. Tabulatoren 
sind alle 10 Spalten gesetzt. Sie stehen dort unveränderbar und sollen Ihnen helfen in 
Ihren Texten Ordnung zu halten. 
Natürlich kann man nicht nur den Cursor über den Bildschirm fitzen lassen. Es läßt sich 
ebenso das durch den Bildschirm dargestellte Textfenster auf und ab bewegen. In Neu- 
deutsch nennt man dies 'Scrollen’. Control W bewegt das Textfenster um eine Zeile 
nach oben, Control Z um eine Zeile nach unten. Contro! Z paßt übrigens nicht in dieses 
Schema, wenn Sie eine deutsche Tastatur besitzen. In Amerika hat man auf der Tastatur 
Z und Y vertauscht und dB der Ur-Editor dort entstanden ist, müssen wir aus Kompatibi- 
Iitätsgründen mit diesem Schönheitsfehler teben. Im Editor wäre dies sehr leicht zu 
ändern, aber die vielen Handbücher zu ändern ist nicht vertretbar. Und erst die vielen 
Kopien. ... 
Da Sie als C’T KAT-Ce-Besitzer zur Elite der Computeranwender gehören, gehen wir 
davon aus, daß Sie die anderen Editorkommandos, anhand der nachfolgenden Aufstel- 
lung, auch ohne langatmige Beschreibung begreifen. Trockenschwimmen ist da ohne- 
hin sinnlos. Am besten, Sie beginnen mit einem kleinen Programm. 
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4.3.1 Die Editor-Kommandos 


Cursor Bewegungen: 


Otrl-S 
Gtri-H 
Otri-D 
Otri-A 
Ctri-F 
Ctri-E 
Otrl-X 
Otri-W 
Ctrl-Z 
Gtri-R 
Otri-C 
Gtri-Q-S 
Ctri-Q-D 
Otrl-Q-E 
Gtrl-Q-M 
Otrl-Q-X 
Ctrl-Q-R 


Zeichen links (ohne Löschen) 
Zeichen links (mit Löschen) 
Zeichen recht 

Wort links 

Wortrechts 

Zeile nach oben 

Zeile nach unten 

Scrollup 

Scrolldown 

Seite zurückblättern 

Seite vorblättern 

zum Zeilenanfang 

zum Zeilenende 

zum Seitenanfang 

Seite zentrieren 

zum Seitenende 

zum Textbeginn 


Gtrl-Qın»R um n-Seiten zurück 


Otrl-Q-C 


zum Textende 


Otrl-Qn:C um n-Seiten vorwärts 


Ctri-Q-B 
CtrI-Q-K 
Ctri-Q-P 


zum Blockbeginn 
zum Blockende 
zur letzten Cursorposition 


Einfügen und Löschen: 


Ctri-V 
Otri-N 
Otri-Y 
Otri-Q-Y 
Otrl-G 
Otri-T 


Einfügemodus an/aus 

Zeile einfügen 

Zeilelöschen 

Rest der Zeile löschen 

Zeichen unter dem Cursor löschen 
Wort rechtslöschen 


Blockkommandos: 


Crri-K-B 
Gtri-K-K 
Gtri-K-T 
Ctri-K-C 
Otri-K-V 
Otri-K-Y 
Ctri-K-R 
Gtrl-K-W 


Blockanfang markieren 

Blockende markieren 

Wort über dern Cursor markieren 

Block kopieren 

Block versetzen 

Block löschen 

Block von Diskette lesen und vor der aktuellen Zeile einfügen 

Block auf Diskette schreiben (Die beiden markierten Zeilen werden ganz 
mit abgespeichert) 
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Verschiedene Kommandos: 

ESCAPE Editieren Ende 

Otri-Q-V Einrückmodus an/aus 

Gtrl-I Tab rechts 

Gtr!-J Tab links 

Ctrl-Q(n)! Tab-Distanz setzen 

Otrl-A{n)F String bzw. Wort suchen 

Ctrl-QA{n)A String bzw. Wort suchen und ersetzen 
Gtri-P Ersatztaste für Control-Zeichen definieren 
Otri-L Wort über Cursor suchen 

Ctrl-Q-L Letzte Suche wiederholen 

Ctrl-Q-T Zeilenlänge auf Bildschirmbreite reduzieren 


4.4 Der Assembler 


Den ROM-residenten 2-Pass-Assembler erreichen Sie vom Hauptmenü aus mit A oder 
beim Verlassen des Editors nach 'bejahen’ der entsprechenden Frage. 2-Pass heißt 
hier, daß die Umwandlung eines Quelltextes in ein Maschinenprogramm in 2 Durchläu- 
fen erfolgt. Dabei muß jeweils der ganze Text von Anfang bis Ende analysiert werden. 
Der Assembler beginnt den ersten Pass einer Übersetzung generell mit dem im Textbe- 
reich des Editors stehenden Quelltext. Findet der Assembler in diesem Text keine 
Anweisung zum Nachladen eines weiteren Texies, so laufen erster und zweiter Pass 
ohne Diskettenzugriffe direkt hintereinander ab. Die Übersetzungszeit beträgt dann nur 
einige Sekunden. 

Den Quelltext eines Programms kann man aus organisatorischen Gründen, oder weil 
die RAM-Größe dies erfordert, auf mehrere Diskettendateien verteilen. Eine Nachlade- 
anweisung (CHAIN) am Ende eines 'Teil-Textes’ teilt dem Assembler dann mit, welche 
Datei als nächstes einzulesen ist. Um Platz zu sparen, wird hierfür der Textbereich des 
Editors mehrfach genutzt, oder besser gesagt: überschrieben. Es muß also, wenn der 
erste Pass zu Ende ist, die erste Textportion - die ursprünglich im RAM stand - von der 
Diskette gelesen werden. Dies erfordert, daß der erste Textteil — der für den Start der 
Übersetzung nur im RAM stehen mußte - auch auf der Diskette zu finden ist. Den Datei- 
namen dieser ersten Datei sucht der Assembler im Editor. Es ist also zwingend erforder- 
lich, diese erste Datei vor dem Beginn einer Übersetzung mit dem Editor auf die Diskette 
zu Schreiben oder von ihr zu lesen. 

Die vom Assembler erzeugten Maschinenbefehle (Object-Code) werden in Blöcken von 
512 Bytes auf der Diskette abgespeichert. Die Programmgröße ist bei diesem Verfahren 
also nur durch die RAM-Größe und die Anzahl der Label beschränkt. Näheres hierzu fin- 
den Sie unter 4.4.3. Die Startadresse des Programms und der Dateinamefür den 
Object-Code sind in einer ORG-Anweisung anzugeben. Der Assembler speichert die 
Startadresse und die Programmlänge in je zwei L-Worten am Beginn der Datei. 

Findet der Assembler im Quellcode einen Fehler, so wird eine Fehlermeldung ausgege- 
ben und auf einen Tastendruck gewartet. Durch die Eingabe von E wird dann die Über- 
setzung abgebrochen, der Editor aufgerufen, der Quelltext ausgegeben und der Cursor 
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auf das Ende der fehlerhaften Zeile positioniert. Sie brauchen dann nur noch den Fehler 
zu korrigieren und erneut den Assembler zu starten. Besteht das Programm aus mehre- 
ren Dateien, müssen Sie zuvor natürlich die Start-Datei laden, so wie im vorherigen 
Abschnitt beschrieben. 
Der Quelltext braucht für den Assembler nicht formatiert zu sein. Ein Blank zwischen 
Label und Befehl bzw. Befehl und Operand reicht aus. Eine Zeile ohne Label muß mit 
einem Blank beginnen. Die Label-Länge ist im Prinzip nicht begrenzt, der Assembler 
wertet aber nur die ersten 9 Stellen für die Unterscheidung der Label aus. Ein Label muß 
mit einem Buchstaben beginnen. 
Nun noch etwas zur Syntax. Operanden werden entweder als Register oder als Aus- 
druck angegeben. Als Register sind die Datenregister DO bis D7 und die Adressregister 
AO bis A7 sowie SR und CCR zulässig. SR bezeichnet das Statusregister und CCR das 
Condition-Code-Register. A7 gibt es doppelt. Abhängig vom S-Bit (Supervisor-Status) 
im SR wird A7 oder A7’ angesprochen. Da A7 als Stackpointer dient, gibt es somit einen 
Supervisorstackpointer und einen User-Stackpointer. In der C’t KAT-Ce ist das S-Bit 
immer gesetzt. Wenn Sie es nicht ändern, können Sie es vergessen. 
Ein Ausdruck besteht aus einem oder mehreren Elementen, die durch + oder - verknüpft 
sein können. Als Elemente sind zulässig: 

symbolische Namen 

Dezimalzahlen 

Hexadezimalzahlen (beginnend mit “$“) 

Binärmuster (beginnend mit "%“) 

Texte (zwischen Apostrophen) 
Beispiele für syntaktisch richtige Ausdrücke sind: 

NAME1-NAME2 

NAME1+100 

NAME2+$10F 

$100-100+’A’ 

NAME 1+%10101011 
Ein Ausdruck wird vom Assembler während der Übersetzung errechnet und im Object- 
Code abgelegt. Ziel der ganzen Operation ist es, eine sinnvolle Adresse zu bestimmen. 
Der Ausdruck NAME 1+NAME 2 ist zwar auch errechenbar, stellt aber keine sinnvolle 
Adresse dar, wenn NAME 1 und NAME 2 Speicheradressen sind. 


4.4.1 Steueranweisungen und Befehle 


Außer den Befehlen, die der Assembler direkt in Maschinenbefehle unısetzt, gibt es 
noch eine Reihe von Steueranweisungen die den Assembler mit zusätzlicher Informa- 
tion versorgen, die Definition von Konstanten ermöglichen, den Übersetzungslauf 
beeinflussen oder die Protokollausgabe steuern. Diese Steueranweisungen werden 
Pseudo-Befehle genannt, weil sie im Quelltext an der gleichen Stelle stehen müssen wie 
die Befehle aber selbst keinen Object-Code ergeben. Folgende Pseudo-Befehle sind im 
Assembler realisiert: 
EQU Diese Anweisung ordnet einem symbolischen Namen (Label) einen Aus- 
druck zu. Weil das Ergebnis einer EQU-Anweisung die Länge nachfol- 
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ORG 


END 


LIST 


NOLIST 


LIST 
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gender Befehle beeinflussen kann, muß es im ersten Pass vollständig 
ermittelt werden. Der Ausdruck einer EQU-Anweisung darf deshalb 
neben Konstanten nur symbolische Namen enthalten, die bereits vorher 
definiert wurden. 

EQU'’s die Konstanten definieren oder die sich auf die Sprungtabelle der 
C'T KAT-Ce beziehen, sollten unbedingt am Programmanfang stehen. 


Beispiel: NAME1 EQU $1234 
NAME2 EQU $100 
NEUNAME EQU NAME1-NAME2+100 


NEUNAME bekommt also den Wert $1398 zugeordnet. 

In der ORG-Anweisung wird die Starladresse und danach, durch ein 
Komma getrennt, der Dateiname des Object-Codes angegeben. Es ist 
nicht zulässig die ORG-Anweisung mit einem Label zu versehen. 
Beispiel: ORGS$1000,#4:CODENAME.CODE 

beendet das zu übersetzende Programm. Eventuell noch folgender Text 
wird ignoriert. 

Die LIST-Anweisung veranlaßt die Ausgabe eines Übersetzungsproto- 
kolls. Es enthält von links nach rechts: Die Speicheradresse und den 
Objectcode, daran anschließend den Quelltext in formatierter Darstel- 
lung. Am Ende der Übersetzung wird eine unsortierte Referenztabelle 
ausgegeben. In ihr wird angezeigt, welche Werte die verschiedenen 
Label erhalten haben. LIST ist beim Start des Assemblers standardmäßig 
voreingestellt. Die Anweisung kann in einem Programm an beliebigen 
Stellen und beliebig oft gegeben werden. Sie brauchen also nicht immer 
das ganze Programm "aufzulisten'. Der LIST-Befehl verlangsamt die 
Übersetzung nämlich erheblich. 

beendet die Ausgabe des Übersetzungsprotokolls. Die Anweisung kann 
an beliebigen Stellen und beliebig oft gegeben werden. 

P1 ... P4 veranlaßt die Ausgabe des Übersetzungsprotokolls über die 
Druckerschnittstelle der C’T KAT-Ce. Es ist zweckmäßig, den Drucker 
zuvor auf 132 Druckstellen einzustellen. Das folgende Progrämmchen 
zeigt dies als Beispiel für einen EPSON-Drucker. 


ORG $1000,#4:PR132. CODE 
PRINTINIT EQU $8001C0 
PRINTOUT EQU $8001C8 
JSR PRINTINIT ‚Schnittst. init. 
LEA TABELLE,A1 ;Adr.Byte-Tabp A1 
LOOP MOVE.B (A1)+,DO ‚next Byte$ DO 
BEQ FERTIG ;Tab zu ende? 
JSR PRINTOUT ‚Bytep Drucker 
BRA LOOP id next Byte 
FERTIG RTS ;» Hauptmenü 
TABELLE DC.B $OF ‚132 Zeich./Zeile 
DC.B $1B,'R’,3 ‚Deut. Zeichensatz 
DC.B 0 ;Tabellenende 


WAIT 
ASC 


STR 


DC 


SYNC 


CHAIN 


“ 


hält den Übersetzungsvorgang an und wartet auf einen Tastendruck. 
übersetzt die Zeichenfolge zwischen den Apostrophen in ASCII-Code 
und fügt ihn in den Object-Code ein. 
Beispiel: 

NAME ASC "BEISPIEL 
ergibt den Object-Code in HEX: 4245 4953 5049 454C 
übersetzt die Zeichenfolge zwischen den Apostrophen in ASCII-Code 
und speichert ihn mit der Länge vorweg in den Object-Code. 
Beispiel: 

NAME STR BEISPIEL’ 
ergibt den OBJECT-Code in HEX: 0742 4549 5350 4945 4C 
Define Code erzeugt je nach Zusatz eine Folge von Bytes, Worten oder 
Doppelworten. Die einzelnen Werte werden durch Kommata voneinan- 


der getrennt. 
Beispiel: 
NAME1 EQU SAB 

DC.B '1',45,$12,NAMEI 
ergibt den Object-Code in HEX: 312D 12AB 
Hinweis: 

DC.B ’KATCE’ 
erzeugt nur ein Byte mit dem Inhalt $45 (letztes Zeichen von 'KATCE'). 
NAMEI EQU $1234 
NAME2 EQU $0234 

DC.W $ABCD,NAME1-NAME2 
ergibt den Object-Code in HEX: ABCD 1000 

DC.L 0,0,0 


ergibt im Object-Code 3 Doppelworte (12 Byte) mit dem Inhalt Null. 

Die Struktur des M68000 erfordert es, daß Befehle und Wort-Daten an 
einer Wortgrenze, also geraden Adressen, beginnen. Anderenfalls kann 
die CPU ein Wort nicht mit einem Zugriff aus dem RAM lesen. Normaler- 
weise ist diese Ausrichtung in einem Programm von Anfang an gegeben, 
dß alle Befehle eine gerade Anzahl von Bytes belegen. Lediglich die Def- 
inition von Bytes mit ASC, STR oder DC.B kann diese Ordnung stören. 
Geschieht dies am Ende eines Programms, ist es bedeutungslos, folgen 
aber noch Befehle, so muß bei Bedarf ein Byte eingefügt werden. Die 
SYNC-Anweisung veranlaßt den Assernbler zur Überprüfung seines 
Adresszählers, falls er ungerade ist, wird ein Null-Byte eingefügt und die 
Übersetzung fortgesetzt. Fehlt eine SYNC-Anweisung, verhütet eine 
Fehlermeldung den möglichen Programmabsturz. 

veranlaßt den Assembler, die nächste Textportion von der Diskette zu 
lesen. Das Laufwerk und der Dateiname sind entsprechend den Anforde- 
rungen des Betriebssystems im Terminalrechner anzugeben. 

Beispiel: CHAIN #5:NEUER.TEXT 

Mit den 'Befehlen’ (" und *) können Sie größere Textpassagen zum Kom- 
mentar erklären. Die damit eingerahmten Programmteile werden vom 
Übersetzer ignoriert. Formal werden diese Zeichen wie Befehle behan- 
delt und müssen deshalb auch deren Konventionen genügen. 

Beispiel: 
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(* Dies ist ein 
mehrzeiliger Kommentar 


) 


In der nachfolgenden Übersicht sind alle Befehle aufgeführt, die der Assernbler ver- 
steht. Es wurden dabei folgende Abkürzungen verwandt: 

An Adressregistern 

D8 8-Bit-Adressdistanz 

D16 16-Bit-Adressdistanz 

Dn Datenregistern 

EA effektive Adresse 

PC _Programmzähler 

SR  Statusregister 


N) Inhalt von 
o obligatorische Angaben 
> ergibt 
ABCD Add Binary Coded Decimal / Byte 
ABCD Dy,Dx oder ABCD -(Ay),-{Ax) 
ADD Add Binary / Byte, Wort, Doppelwort 
ADD «EA-,DN oder ADD Dnn.«EA» 
ADDA Add Adress / Wort, Doppelwort 
ADD «EA» ,An 
ADDI Add Immediate / Byte, Wort, Doppelwort 
ADDI #«Dater» «EA» 
ADDQO Add Quick / Byte, Wort, Doppelwort 
ADDQ #:Daten;«EA»; Daten nur O bis 7 
ADDX Add with Extend / Byte, Wort, Doppelwort 
ADDX Dy,Dx oder ADDX -(Ay),-(Ax) 
AND And logical / Byte, Wort, Doppelwort 
AND «EA»,Dn oder AND Dn.«EA» 
ANDI And Immediate / Byte, Wort, Doppelwort 
ANDI #:Daten: «EA» 
ANDI And Immediate to Condition Code Register / Byte 
ANDI #«8-Bit-Daten., CCR 
ANDI And Immediate to Status Register / Wort 
ANDI #«16-Bit-Daten», SR 
ASL Arithmetic Shift Left / Byte, Wort, Doppelwort 
ASL Dx,Dy oder ASL #:Daten,Dn oder ASL «EA» 
ASR Arithmetic Shift Right / Byte, Wort, Doppelwort 
ASR Dx,Dy oder ASR #:Daten,Dn oder ASR «EA» 
BCC Branch Carry Clear 
BCC «Label» 
BCS Branch Carry Set 
BCS «Labeb 
BEQ Branch Equal 
BEQ «Label. 
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BNE 
BGE 
BGT 
BHI 
BLE 
BLS 
BLT 
BMI 
BPL 
BVC 
BVS 
BT 
BF 


BCHG 
BCLR 
BRA 
BSET 
BSR 
BTST 
CHK 
CLR 
CMP 


CMPA 


Branch Not Equal 
BNE «Label» 

Branch Greater or Equal 
BGE «Label 

Branch Greater Than 
BGT «Label 

Branch Hi 

BHI «Label» 

Branch Less or Equal 
BLE «Label 

Branch Less or Same 
BLS «Label 

Branch Less Than 
BLT «Label» 

Branch Minus 

BMI «Labeb 

Branch Plus 

BPL «Label» 

Branch Overflow Clear 
BVC «Label: 

Branch Overflow Set 
BVS :Labeb 

Branch True 

BT «Label 

Branch False 

BF «Label 


Bit Test and Change / Byte, Doppelwort 
BCHG Dn,-EA, oder BCHG #«Daten «EA» 
Bit Test and Change / Byte, Doppelwort 
BCLR Dn,«EA: oder BCLR #:Daten «EA» 
Branch Always 

BRA «Label: 

Bit Test and Set / Byte, Doppelwort 
BSET Dn,:EA» oder BSET #:Daten: «EA» 
Branch to Sukroutine 

BSR «Label» 

Bit Test /Byte, Doppelwort 

BTST Dn,«EA, oder BTST #-«Daten: «EA» 
Check Register Against Bounds / Wort 
CHK «EA »,‚Dn 

Clear Operand / Byte, Wort, Doppelwort 
CLR «EA» 

Compare / Byte, Wort, Doppelwort 
CMP «EA ,Dn 

Compare Adress / Wort, Doppelwort 
CMPA «EA»,An 
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CMPI 
CMPM 
DBCC 
DBCS 
DBEQ 
DBNE 
DBGE 
DBGT 
DBHI 
DBLE 
DBLS 
DBLT 
DBMI 
DBPL 
DBVC 
DBVS 
DBT 
DBF 
DIVS 
DIVU 
EOR 
EORI 
EORI 


EORI 
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Compare iImmediate / Byte, Wort, Doppelwort 
CMPI #«Daten: «EA» 

Compare Memory / Byte, Wort, Doppelwort 
CMPM (Ay)+ (Ax)+ 

Test, Decrement and Branch Carry Clear / Wort 
DBCC Dn,Label» 

Test, Decrement and Branch Carry Set / Wort 
DBCS Dn.«Label» 

Test, Decrement and Branch Equal / Wort 

DBEO Dn,-Label» 

Test, Decrement and Branch Not Equal / Wort 
DBNE Dn,«Label» 

Test, Decrement and Branch Greater or Equal / Wort 
DBGE Dn,«Label 

Test, Decrement and Branch Greater Than / Wort 
DBGT Dn.«Label» 

Test, Decrement and Branch High / Wort 

DBHI Dn,«Label» 

Test, Decrement and Branch Less or Equal / Wort 
DBLE Dn,:Label» 

Test, Decrement and Branch Less or Same / Wort 
DBLS Dn,«Label» 

Test, Decrement and Branch Less Than / Wort 
DBLT Dn,.:Label» 

Test, Decrement and Branch Minus / Wort 

DBMI Dn,.:Label» 

Test, Decrement and Branch Plus / Wort 

DBPL Dn,«Label» 

Test, Decrement and Branch Overflow Clear / Wort 
DBVC Dn,.Label» 

Test, Decrement and Branch Overllow Set / Wort 
DBVS Dn «Label 

Test, Decrement and Branch True / Wort 

DBT Dn.:Label» 

Test, Decrement and Branch False / Wort 

DBF Dn,-Label» 

Signed Divide / Wort 

DIVS «EA»,Dn 

Unsigned Divide / Wort 

DIVU «EA»,Dn 

Exclusive Or Logical/ Byte, Wort, Doppelwort 

EOR Dn, «EA» 

Exclusive Or Immediate / Byte, Wort, Doppelwort 
EORI #:«Daten: «EA 

Exclusive Or Immediate to CCR / Byte 

EORI #8-Bit-Daten,CCR 

Exclusive Or Immediate to SR / Wort 

EORI #+16-Bit-Daten:,SR 


EXG 
EXT 
JMP 
JSR 
LEA 
LINK 
LSL 
LSR 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVEA 
MOVEM 


MOVEP 
MOVEQ 
MULS 
MULU 
NBCD 


NEG 


Exchange Registers / Doppelwort 
EXG Rx,Ry 
Sign Extend / Wort, Doppelwort 
EXT Dn 
Jump 
JMP «EA» 
Jump to Subroutine 
JSR «EA» 
Load effective Adress / Doppelwort 
LEA «EA», An 
Link and Allocate 
LINK An, #«D16> 
Logical Shift Left / Byte, Wort, Doppelwort 
LSL Dx,Dy oder LSL #«Daten:,Dn oder LSL «EA» 
Logical Shift Right / Byte, Wort, Doppelwort 
LSR Dx,Dy oder LSR #«Daten»,Dn oder LSR «EA» 
Move Data / Byte, Wort, Doppelwort 
MOVE «EA; «EA, 
Move Data to CCR / Wort 
MOVE «EA», CCR 
Move Data to SR / Wort 
MOVE «EA», SR 
Move from SR / Wort 
MOVE SR.«EA» 
Move User Stack Pointer / Doppelwort 
MOVE USP,An oder MOVE An,USP 
Move Adress / Wort, Doppelwort 
MOVEA «EA», An 
Move Multiple Registers / Wort, Doppelwort 
MOVEM «Reg.Liste: «EA» oder MOVEM «EA» «Reg.Liste> 
Beispiele für «Reg.Liste»: 
D5-A2 
bezeichnet die Register D5,D6,D7,A0,A1 und A2 
D0,D1,D4/D6-AO 
bezeichnet die Register DO,D1,D4,D6,D7 und AO 
Move Peripheral Data / Wort, Doppelwort 
MOVE Dx,D(Ay) oder MOVE D(Ay),Dx 
Move Quick / Doppelwort 
MOVEQ #:8-Bit-Daten:,Dn 
Signed Multiply / Wort 
MULS «EA», Dr 
Unsigned Multiply / Wort 
MULU «EA»,Drn 
Negate Decimal with Extend / Byte 
NBCD «EA» 
Negate / Byte, Wort, Doppelwort 
NEG «EA» 
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NEGX 
NOP 
NOT 
OR 
ORI 
ORI 
ORI 
PEA 
RESET 
ROL 
ROR 
ROXL 
ROXR 
RTE 
ATR 
RTS 
SBCD 
SCC 
SCS 
SEQ 
SNE 
SGE 
SGT 


SHI 
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Negate with Extend / Byte, Wort, Doppeiwort 
NEGX «EA» 
No Operation 
NOP 

Logical Complement / Byte, Wort, Doppelwort 
NOT «EA» 

Logical Or / Byte, Wort, Doppelwort 

OR «EA»,Dn oder OR Dn,.«EA» 

Logical Or Immediate / Byte, Wort, Doppelwort 
ORI #«Daten «EA» 

Logical Or Immediate to CCR / Byte 

ORI #«8-Bit-Daten, CCR 

Logical Or Immediate to SR / Wort 

ORI #+16-Bit-Daten»,SR 

Push Effective Adress / Doppelwort 

PEA «EA» 

Reset External Devices 

RESET 

Rotate Left without Extend / Byte, Wort, Doppelwort 
ROL Dx,Dy oder ROL #:Daten:,Dn oder ROL «EA 
Rotate Right without Extend / Byte, Wort, Doppelwort 
ROL Dx,Dy oder ROL #:«Daten»,Dn oder ROL «EA» 
Rotate Left with Extend / Byte, Wort, Doppelwort 
ROXL Dx,Dy oder ROXL #:Daten:‚Dn oder ROXL «EA» 
Rotate Right with Extend / Byte, Wort, Doppelwort 
ROXR Dx,Dy oder ROXR #«Daten»,‚Dn oder ROXR »EA» 
Retum from Exception 

RTE 

Retum and Restore Condition Codes 

RTR 

Return from Subroutine 

RTS 

Subtract Decimal with Extend / Byte 

SBCD Dy,Dx oder SBCD -(Ay),-{Ax) 

Set according to Condition Carry Clear / Byte 

SCC «EA» 

Set according to Condition Carry Set / Byte 

SCS «EA» 

Set according to Condition Equal / Byte 

SEQ «EA» 

Set according to Condition Not Equal / Byte 

SNE «EA» 

Set according to Condition Greater or Equal / Byte 
SGE «EA» 

Set according to Condition Greater Than / Byte 
SGT «EA 

Set according to Condition High / Byte 

SHI «EA 


SLE 
SLS 
SLT 
SMI 
SPL 
Svc 
svs 
ST 
SF 
STOP 
SUB 
SUBA 
SUBI 
SUBQ 
SUBX 
SWAP 
TAS 
TRAP 
TRAPV 
TST 
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Set according to Condition Less or Equal / Byte 
SLE «EA» 

Set according to Condition Less or Same / Byte 
SLS «EA» 

Set according to Condition Less Than / Byte 
SLT «EA» 

Set according to Condition Minus / Byte 

SMI «EA» 

Set according to Condition Plus / Byte 

SPL «EA» 

Set according to Condition Overflow Clear / Byte 
SVC «EA» 

Set according to Condition Overflow Set / Byte 
SVS «EA 

Set according to Condition True / Byte 

ST «EA» 

Set according to Condition False / Byte 

SF «EA 

Load Statusregister and Stop 

STOP +16-Bit-Daten» 

Subtract Binary / Byte, Wort, Doppelwort 
SUB «EA»,Dn oder SUB Dn,«EA» 

Subtract Adress / Wort, Doppelwort 

SUBA «EA», An 

Subtract Immediate / Byte, Wort, Doppelwort 
SUBI #«DAten: «EA» 

Subtract Quick / Byte, Wort, Doppelwort 
SUBQ #.Daten: «EA» ; Daten 1 bis 8 

Subtract with Extend / Byte, Wort, Doppelwort 
SUBX Dy,Dx oder SUBX -(Ay),-(Ax) 

Swap Register Halves / Wort 

SWAP Dn 

Test and Set Operand / Byte 

TAS «EA» 

Trap 

TRAP #«Daten:; Daten O bis 15 

Trap on Overflow 

TRAPV 

Test an Operand / Byte, Wort, Doppelwort 
TST «EA» 

Unlink 

UNLK An 


Für weitergehende Informationen über die Wirkungsweise der einzelnen Befehle müs- 
sen wir auf die im Handel angebotene Literatur verweisen. " 
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4.4.2 Bedingtes Übersetzen / conditional assembly 


Oft ist es erforderlich, von einem Programm mehrere Versionen bereitzuhalten und zu 
pflegen. Dies kann bei großen Programmen und vielen Versionen ganz schön aufwen- 
dig und fehleranfällig werden. In diesem Fall kann das 'conditional assembiy’ weiterhel- 
fen. Hiermit ist es möglich, mit Hilfe von Bedingungen ganze Passagen des Quelltextes 
von der Übersetzung auszuschließen oder gezielt mit einzubeziehen. 

IF Der Operand dieser Anweisung wird während der Übersetzung vom 
Assembler getestet. Ist er gleich Null, werden die nachfolgenden Quell- 
text-Zeilen bis ELSE- oder ENDIF-Anweisung überlesen bzw. wie Kom- 
mentar behandeit. Ist der Operand ungleich Null, werden die folgenden 
Zeilen übersetzt. Als Operand ist jeder Ausdruck zulässig. 

ELSE Die hiernach folgenden Zeilen bis zur ENDIF-Anweisung werden über- 
setzt, wenn der Operand zur IF-Anweisung gleich Null ist. Anderenfalls 
werden sie überlesen bzw. wie Kommentar behandelt. 

ENDIF beendet die "bedingte Übersetzung. Die jetzt folgenden Zeilen werden 
unbedingt übersetzt. 

Die Anweisungfolge IF, ELSE und ENDIF kann in einem Programm beliebig oft wieder- 

holt werden. Die ELSE-Anweisung ist nur notwendig, wenn die Logik dies erfordert. 

Beispiel: 


TESTWERT EQU 0 
IF TESTWERT 

LADEDO MOVE.W S1234,D0 
ELSE 

LADEDO MOVE.W $5678,DO 
ENDIF 


Im Object-Code wird der Befehl (es dürfen auch viele sein) MOVE.W $5678,DO abge- 
setzt. Wie das Beispiel zeigt, sind auch Label-Definitionen erlaubt. 


4.4.3 RAM-Belegung beim Arbeiten mit 
Editor und Assembler 


Abhängig von der Größe Ihres Einkommens können Sie den RAM der C’T KAT-Ce 
unterschiedlich bestücken. In der Minimalversion enthält die Platine 4 RAM-IC’s von je 
8 Kilobyte. Insgesamt also 32K. Dieser Bereich wird vom Monitor in Text- und Code- 
speicher aufgeteilt. Das Ergebnis dieser Bemühungen wird im Hauptmenü angezeigt. 
Sollte Ihnen diese Aufteilung nicht gefallen, können die entsprechenden Pointer vom 
Monitor aus vorgegeben werden. Die Adressen sind: 
TEXTSTART = $384 
RAMENDE = $3B8 (Textende) 
CODESTART = $3BC 
„ Für den Text stehen in der Minimalversion ca. 20K zur Verfügung (mehr hat APPLE-Pas- 
cal auch nicht). Reicht dies nicht aus, müssen Sie den Text in mehrere Dateien aufteilen 
und diese dann zum Assemblieren aneinanderketten. Wie das geht, finden Sie bei den 
Assembleranweisungen unter 'CHAIN’. Der Object-Code wird dann mit Hilfe einer 
ORG-Anweisung auf der Diskette abgelegt. 
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Während im ersten Fall der Assembler den Codespeicher zwischen Code und Label 
nach Bedarf dynamisch aufgeteilt, muß im zweiten Fall mit einem reservierten Label- 
speicher gearbeitet werden. Immerhin darf das Programm dann 675 Label enthalten. 


4.5 Datei-Organisation 


Files werden immer blockweise bearbeitet. Die Blocklänge beträgt 512 Bytes. Zujedem 
File gehört eine Filenummer, die bei allen Diskettenoperationen anzugeben ist. Ledig- 
lich IoResult ist von einer Filenummer unabhängig. 

Der Diskettenzugriff mit Hilfe von Filenummern erleichtert das Arbeiten mit mehreren 
gleichzeitig eröffneten Files. Der Assembler der C’T KAT-Ce z.B. nutzt bei der Disket- 
ten-Assemblierung gleichzeitig zwei Files (Filenummer O und 1). 

Die Anzahl der Files, die gleichzeitig eröffnet sein können, wird nur durch das Betriebsy- 
stem des Terminalrechners begrenzt. 

Der Filename wird von der C’T KAT-Ce als String mit der Länge vorweg gesendet. 

Es kann davon ausgegangen werden, daß die C’T KAT-Ce die Daten wesentlich schnel- 
ler sendet, als der Terminalrechner sie verarbeiten kann. Damit keine Daten verloren 
gehen, muß das Terminalprogramm während länger andauernder Operationen die 
RTS-Leitung sperren und danach wieder frei geben. Dies gilt insbesondere für Disket- 
tenoperationen und Bildschirmausgaben. 

Innerhalb der 512-Byte-Blöcke speichert der Editor die Texte inZeilen variabler Länge. 
Jede Zeile beginnt mit dem Steuerzeichen $10. Es schließt sich $20+n an, wobei n die 
Anzahl der Blanks am Zeilenanfang darstellt. Danach folgt der Zeileninhalt in ASCII-Dar- 
stellung, endend mit $0D. Das Textende wird mit $00 markiert. 

Die Dateiorganisation von APPLE-PRODOS weist eine bemerkenswerte Eigenart auf. 
PRODOS gibt den Files eigene Nummern, die unabhängig von den Filenummern der 
C’T KAT-Ce sind. Ein Schließaufruf (Close) bewirkt nun, daß nicht nur das angegebene 
File geschlossen wird, sondern auch alle anderen, danach eröffneten Files (mit einer 
größeren Filenummer). 


4.6 Das Terminal-Programm 


Für die in 2.2 bis 2.5 genannten Rechner können Sie von C’T auf Anforderung ein geeig- 
netes Terminal-Programm erhalten. Falls Sie C'’T KAT-Ce an einen anderen Rechner 
anschließen möchten, oder Ihnen das Standard-Proramm nicht gefällt, müssen Sie 
selbst ein Programm schreiben. Zur Unterstützung finden Sie nachfolgend einen Pro- 
grammablaufplan in tabellarischer Form. 


START 

1.Initialisierung der Schnittstelle 
Bei der Bestellung der C’T KAT-Ce können Sie wählen, ob die Verbindung zwi- 
schen Terminal-Rechner und C’T KAT-Ce über eine serielle oder eine parallele 
Schnittstelle erfolgen soll. Die ROMs der C’T KAT-Ce enthalten dann das jeweils 
richtige Treiberprogramm. 
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a) parallele Schnittstelle: 


Sobald die C’T KAT-Ce sich empfangsbereit gemeldet hat, sendet das Termi- 
nalprogramm ein «CR: und springt zur Hauptroutine (READKATCE). 
b) serielle Schnittstelle: 
Zur automatischen Erkennung der Baudrate liest die C’T KAT-Ce solange Zei- 
chen von der Schnittstelle, bis ein «CR: richtig erkannt wird. Aus diesem Grund 
muß die Initialisierung der Schnittstelle in einer Schleife erfolgen. 
SERINITSTART Sende ein «CR: zur C'TKAT-Ce 
0% ZAEHLER 
LOOP warte 1/10000 Sekunde 
«CR: angekommen? 
ja:$ READKATCE  ;lInitialisierung fertig 
nein: ZAEHLER +1 
ZAEHLER = 1000? 
ja:# SERINITSTART 
nein: LOOP 


2.Hauptroutine (identisch für für beide Schnittstellen) 
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READKATCE lies nächstes Zeichen von der C'TKAT-Ce 
wenn Zeichen = $11:# CHAR11 ; Sonderbearbeitung 
wenn Zeichen = $12:# CHAR12 ; Keypressbearbeitung 
wenn Zeichen = $13:$ CHAR13 ; Tastaturbearbeitung 
sonst: Zeichen auf Bildschirm ausgeben, 


» READKATCE 
Tastaturbearbeitung 
CHAR? y lies nächstes Zeichen von der Tastatur. 
(Wenn noch kein Zeichen eingegeben wurde, muß auf die 
Eingabe gewartet werden) 
sende Tastenwert  C'’TKAT-Ce 
4 READKATCE 
Keypressbearbeitung 
CHARA a istoder wurde eine Taste gedrückt? 


ja: sende $01 9 C'T KAT-Ce, $READKATCE 
nein: sende $00$ C’T KAT-Ce,  READKATCE 
Sonderbearbeitung 
CHAR lies nächstes Byte von der C’T KAT-Ce 
wenn Byte = $00: ; Setup 
Sende maximale X- und Y-Koordinate 
zur C'TKAT-Ce. 
4 READKATCE 
wenn Byte =$01:; UnitOut 
lies nächstes Byte von der C’T KAT-Ce 
und sende es zum Drucker. 
$ READKATCE 
wenn Byte = $02: ; Unitinit 
initialisiere Druckerschnittstelle. 
» READKATCE 
wenn Byte =$03: ; BlockRead 
lies 1 Byte Filenummer und 2 Bytes Blocknummer 


(HighByte first) von der C’T KAT-Ce. 
lies den dadurch spezifizierten Block (512 Bytes) 
von der Diskette und sende ihn an die C'T KAT-Ce. 
» READKATCE 
wenn Byte = $04: ; BlockWrite 
lies 1 Byte Filenummer und 2 Bytes Blocknummer 
(HighByte first) von der C’T KAT-Ce, 
lies 512 Bytes von der C'TKAT-Ce undschreibe den 
Block an die Filenummer/Blocknummer 
entsprechende Stelle auf der Diskette. 
$ READKATCE 
wenn Byte = $05: ; Resetfile 
lies von der C'T KAT-Ce 1 Byte Filenummer, 
1 ByteN und N-Bytes Filename. 
Öffne File(Filename) zum Lesen. 
» READKATCE 
wenn Byte = $06: ; RewriteFile 
lies von der C’TKAT-Ce 1 Byte Filenummer, 
1 Byte Nund N-Bytes Filename. 
Öffne File (Filename) zum Schreiben. 
» READKATCE 
wenn Byte = $07: ;CloseFile 
lies von der C'T KAT-Ce 1 Byte Filenummer 
und schließe das zugehörige File. 
4 READKATCE 
wenn Byte = $08: ;CloseDeleteFile 
lies von der C'TKAT-Ce 1 Byte Filenummer 
undlösche das zugehörige File. 
# READKATCE 
wenn Byte = #09: ; loResult 
sende das loResult-Byte der letzten Disketten- 
Operation an die C’TKAT-Ce. 
$ READKATCE 
wenn Byte = $OA: ; GotoXY 
lies von der C'TKAT-Ce das X-Koord-Byte und das 
Y-Koord-Byte. Setze den Cursor an diese Stelle des 
Bildschirms. X=0,Y=0 entspricht der oberenlinken 
Ecke des Schirms. 
» READKATCE 
wenn Byte = $OB: ;Quit 
beende das Terminalprogramm. 
Weitere Sondercodes folgen event. später. Der Bereich ab $80 steht für Eigenentwick- 
lungen zur Verfügung. 


33 


5.1 Funktionsbeschreibung und Adressdekodierung 


Die MC68000 CPU kann mit ihren 23 Adressleitungen (A1 bis A23) 8 Megaworte zu je 16 
Bit adressieren. Die Adressleitung AO gibt es nicht, ihre Funktion wird durch die Leitun- 
gen UDS und UDL übernommen. Diese geben an, ob bei einem Speicherzugriff das 
höherwertige (UDS= Upper Data Strobe) und/oder das niederwertige (LDS=Lower Data 
Strobe) Datenbyte eines Wortes zu lesen oder zu schreiben ist. Mit einem 2-Bit Binärde- 
koder (1/2 741S139), von dessen Ausgängen 00, Q1, Q2 und Q3 immer nur einer aktiv 
ist, wird dieser Adressraum in vier gleichgroße Bereiche zu je 4 MB aufgeteilt. 


Der unterste Bereich ($000000 bis $3FFFFF) beinhaltet, je nach Stellung des RS-Fli- 
pflops (2/3 741LS10), die ROMSs oder die RAMs. Je nach Lage dieses Flipflops schaltet 
ein Multiplexer (1/2 74LS157) das Speicherzugriffs-Signal aus QO (Pin 12 des 74LS139) 
entweder zu den ROMs oder zu den RAMs durch. Nach dem Einschalten und nach 
jedem Reset werden zunächst die ROMs und dann die RAMs in diesen Bereich einge- 
blendet. Die Umschaltung erfolgt, nachdem die CPU aus $0 bis $3 den Stackpointer 
und danach aus $4 die Startadresse gelesen hat. Dadie Startadresse auf den Bereich 
ab $800000 zeigt, kann die Umschaltung mit dem o.g. Signal aus QO erfolgen. Weil die 
CPU die Vektoren weiterhin ab Adresse SO erwartet, müssen diese nach jedem Reset 
aus den ROMs in die RAMs übertragen werden. Die weitere Auswahl der RAMs ist 
etwas kompliziert, weil RAM-Bausteine unterschiedlicher Größe in zwei Bänken lücken- 
los hintereinander zu adressieren sind. Die Lösung besteht darin, daß das Chip-Select- 
Signal für die RAMs je nach Type entweder aus A14 oder aus A16 hergeleitet wird. Für 
die Verknüpfung mit UDS/LDS sorgt ein 74LS139-System und ein 74LS32. Da auch die 
Pin-Belegung der beiden RAM-Typen nicht identisch ist, wurden für die notwendigen 
Umschaltungen zwei Jumper installiert. 

Diese Form der Umschaltung legt an alle RAMs die gleichen Adress-Signale an und hat 
zur Folge, daß bei gemischter Bestückung die ’kleinen’ RAMs mehrfach abgebildel 
werden. Die mitgelieferte Software kann dies nicht berücksichtigen und eine gemischte 
Bestückung ist deshalb bei Einsatz der Standardsoftware nicht sinnvoll. 

Die Adressleitungen A15 bis A21 bzw. A17 bis A21 werden nicht ausgewertet und die 
Inhalte der RAMs sind deshalb auch unter anderen Adressen lesbar und zwar sooft, wie 
die als Binärzahl interpretierten unbenutzten Adressbits angeben. 

Da die RAMs für eine mit 8 Mhz betriebene CPU schnell genug sind, braucht kein Warte- 
zyklus erzeugt zu werden. Die Quittierung des RAM-Zugriffes (DTACK) erfolgt deshalb, 


über ein ein 74LS10-Gatter, dessen Ausgang zusätzlich invertiert wird, ebenfalls mit 
dem Signal von QO. 


Der zweite Bereich ($400000 bis $7FFFFF), selektiert durch Q1 (Pin 11 des 74LS139), 
wird mit einem zweiten 74LS139-System durch A13 und LDS noch einmal unterteilt. Da 
A14 bis A21 unberücksichtigt bleiben, wird ein 8K Worte großer Bereich in $400000 bis 
S7FFFFF 256 mal abgebildet. Wegen der Berücksichtigung von LDS, ist immer nur das 
niederwertige Byte eines Wortes selektiert. A13 teilt diesen 8KW-Bereich in zwei gleich- 
große Teile. 

Der untere Teil ist dem Port-Baustein MC68230 zugeordnet. Dieses IC belegt mit seinen 
Eingängen RS1 bis RS5 die Adressleitungen A1 bis A5. Die Leitungen A6 bis A12 und 
A14 bis A21 sind also unbenutzt. Daraus folgt, daß die Register des MC68230 ab 
$400001 alle 8KW 128 mal selektiert werden. Die drei Ports dieses Bausteins sind direkt 
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an entsprechende Pfostenfeld-Stifte amRand der Platine geführt. 


Der obere Teil ist dem DUART (Dual Asynchronous Receiver/Transmitter) zugeteilt. Die- 
ses IC belegt die Adressleitungen A1 bis A4 und wird deshalb ab $402001 alle 8KW 256 
mal eingeblendet. Der Baustein enthält zwei Sende/Empfänger für den seriellen Daten- 
verkehr. Dadieser in der Regel über +/- 12 Volt-Pegel erfolgt, sind entsprechende Trei- 
ber (1488/1489) vorgesehen. Den Takt, für die per Software einstellbaren Baudraten, 
erzeugt der im IC enthaltene Taktgenerator mit einem 3.6864 MHz Quarz. 

Beide Bausteine, MC68230 und MC68681, erzeugen selbst ein DTACK-Signal. 


Der dritte Bereich ($800000 bis $BFFFFF) enthält nach der Umschaltung die ROMs.Im 
Falle der standardmäßig eingesetzten ROMs (27128) sind die Adressleitungen A1 bis 
A14 belegt und die Adressleitungen A15 bis A21 bleiben unberücksichtigt. Daraus folgt, 
daß die ROMs 128 mal (2EX6) hintereinander im Bereich $800000 bis $BFFFFF lesbar 
sind. 


Der höchste Bereich ($C00000 bis $FFFFFF) ist dem Digital-Analog-Wandler, dem Ana- 
log-Digital-Wandler und der Expansionsschnittstelle zugewiesen. Ein weiteres 
74LS139-Systern teilt diesen Bereich mit A14 und A15 in vier 8KW-Biöcke. Die Selektie- 
rung erfolgt über Q3 (Pin 9 vom 74LS139), synchronisiert durch VPA/VMA. Weil hier die 
Adressleitungen A16 bis A21 unberücksichtigt bleiben, wiederholen sich die vier 
Blöcke, beginnend bei $C00000, im 32KW-Raster 64 mal. 

Der erste 8KW-Block bedient die Expansionsschnittstelle. An ihr sind, neben einigen 
Steuersignalen, das niederwertige Datenbyte und die Adressleitungen A1 bis A13 her- 
ausgeführt. Es können also Datenbytes an 4096 verschiedenen ungeraden Adressen 
ein- bzw. ausgegeben werden. Da die Schnittstelle direkt am Daten- und Adressbus der 
C'T KAT-Ce anliegt, muß hier bei Bedarf mit geeigneten ICs (z.B. 74LS244 oder 
7415245) angekoppelt werden. Ein negativer Impuls an Pin 8 (Select invertiert) zeigt an, 
daß die Daten, Adressen und übrigen Signale für die Schnittstelle bestimmt sind. 


Schreiben in die Speicherstelle $C04000 (und alle weiteren bis $CO7FFE) versorgt den 
Digital-Analog-Wandler ZN428 mit einem neuen Digitalwert. 


Lesen aus der Speicherstelle $COC000 startet den Analog-Digital-Wandler ZN427. Der 
digitalisierte Analogwert kann 10 Mikrosekunden später aus $C08000 gelesen werden. 
Auch diese Adressen wiederholen sich 8192 mal hintereinander. 


Ein DTACK-Signal braucht für den Bereich $C00000 bis $FFFFFF nicht erzeugt zu wer- 
den. Es wird von der CPU nach einem onen Zugriff nicht erwartet. 


Taktgenerator und Resetsignalerzeugung weisen keine Besonderheiten auf. 


5.2 Speicherchips und Jumper 


Obwohl Sie mit der Platine zwei EPROMs mitgeliefert bekommen, können Sie bei 
Bedarf auch andere Typen verwenden. Die nachfolgende Tabelle gibt Aufschluß dar- 
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über, welche Jumper bei welchem EPROM-Typ zu stecken sind. Die Angaben beziehen 
sich auf das EPROM-Jumperfeld, das zwischen der CPU und dem High-Byte-EPROM 
angeordnet ist. Wenn die Platine mit der Bestückungsseite nach oben und dem V24- 
Stecker nach rechts, vor Ihnen liegt, ist der Steckplatz für Jumper 1 auf der linken Seite. 
Die Jumper sind so zu stecken, daß jeweils zwei übereinander liegende Stifte miteinan- 
der verbunden werden. Falls Sie 2732-EPROMs verwenden wollen: Diese müssen im 


betreffenden Sockel so gesteckt werden, daß die Pins 1,2 und 27,28 des Sockels frei 
bleiben. 


EFFRÜM-Typ Jumper auf 
2732 m. 2764 zo 6 
27125 146 
E7EZSE 126 
E73I1E 1395 


Bei den RAMs können Sie zwei verschiedene Typen in vier Kombinationen verwenden. 
In der Minimal-Version kommen zwei 6264 mit je BK Byte zum Einsatz und in der Maxi- 
mal-Version werden vier 43256 mit je 32K Byte verwendet. Diese Minimal-Version ist 
bei den derzeitigen RAM-Preisen nicht mehr und die Maximal-Version noch nicht disku- 
tabel. Dazwischen geht es noch mit 4 X 6264 oder 2 X 43256. Andere Kombinationen 
sind wegen der Wortstruktur der CPU nicht erlaubt. Wenn Sie nur zwei RAMs verwen- 
den, müssen Sie diese in die beiden Sockel oberhalb der ROMs stecken. Die Tabelle 
gibt an, wie die Jumper zu stecken sind. Gemeint ist das Jumperfeld rechts vom High- 
Byte-EPROM. Jumpersteckplatz 1 befindet sich am oberen Ende des Jumperfeldes. 


Die Jumper müssen so gesteckt werden, daß nebeneinander liegende Sifte miteinander 
verbunden werden. 


RAM-Typ/ 

Kombination Jumper 
2X6264 13 
4X6264 13 

2X 43256 24 
4xX.43256 24 


Bitte beachten Sie, daß die CPU und der 68230 im Vergleich zu den anderen ICs auf der 
Platine um 180 Grad gedreht sind. 


5.3 Hinweise für Seibstbauer 


Es hat sich herausgestellt, daß die beiden Peripherie-ICs und der 3.6864 MHz-Quarz 
nicht überall zu bekommen sind. Überlegen Sie sich deshalb, ob es nicht besser ist 
einen kompletten Bausatz oder gar eine fertige C’T KAT-Ce zu bestellen. Aber wer einen 
guten Lötkolben hat, möchte diesen natürlich auch nutzen. .... 

Die Platine wird ohne Bestückungsdruck geliefert. Stattdessen erhalten Sie einen ver- 
größerten Bohrplan, auf dem alle Bauleile eingezeichnet sind. Dieses Verfahren scheint 
uns bei einer so fein gewobenen Platine sicherer als ein Bestückungsdruck, der oft 
genug ein bischen verschoben ist und dann im Zweifelsfall keine genaue Auskunft mehr 
gibt. Außerdem ist die Platine so voll gepackt, daß beim fertig aufgebauten Rechner 
vom Bestückungsdruck nicht mehr viel zu sehen wäre. 
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Für die Funktion der C’T KAT-Ce werden zumindest am Anfang nicht alle Bauteile benö- 
tigt. Insbesondere die DA- und AD-Chips können Sie auch noch später kaufen. Den- 
noch möchten wir Ihnen nahe legen, die Sockel und die übrigen Billigteile gleich mit ein- 
zulöten. Sie brauchen dann bei einer späteren Nachrüstung nur noch die ICs einzustöp- 
seln und nicht erst den ganzen Rechner auseinander zu nehmen. Dies ist bei den ver- 
wendeten CMOS RAMs nämlich nicht ohne Risiko, und an der IC-bestückten Platine 
sollte keinesfalls gelötet werden. 

Wenn Sie den 48-Pin-Sockel nicht bekommen können, es geht auch mit zwei anreihba- 
rena 24. Falls auch der 64er nicht erhältlich ist, können Sie einseitige Streifensockel ver- 
wenden oder 40er Sockel mit der Laubsäge zerlegen. Bitte löten Sie keinesfalls die ICs 
ohne Sockel ein, denn ein Fehler ist dann mit vertretbarem Aufwand nicht mehr zu fin- 
den. Falls Sie selbst den Rechner nicht zum Laufen bringen, helfen wir Ihnen gerne, aber 
nur wenn alle ICs gesockelt sind. Die Netzwerke können auch aus Einzelwiderständen 
aufgebaut werden. Der allen Widerständen gemeinsame Pol ist auf dem Plan mit einem 
kleinen Viereck gekennzeichnet. 

Und nun zum Aufbau ... 

Die Bestückungsseite können Sie teicht an den in Platinenlängsrichtung verlaufenden 
Leiterbahnen erkennen. Außerdem sind neben Pin 1 der CPU die Rechnerbezeichnung 
und die Versionsnummer zu lesen. 

Löten Sie zuerst die Widerstände, dann die Sockel, Kondensatoren, Pfostenfeldstifte 
und V24-Buchse ein. Die Quarze lassen Sie am besten bis zum Schluß, sonst sind die 
Drähtchen schon abgebrochen, bevor der Rechner läuft. 

Noch ein paar Feinheiten ... 

Das 12-polige Jumperfeld für die Selektion der ROMs muß so eingelötet werden, daß 
die beiden Durchkontaktierungen neben Pin 38 der CPU frei bleiben. 

Die Quarze sollten mit ihrem Gehäuse ein bischen Abstand zur Platine haben. Anderen- 
falls kann das Gehäuse ungewollte Verbindungen erzeugen. Es gibt für diesen Zweck 
spezielle Unterlegscheibchen. 

Nahe neben Pin 37 der CPU ist eine Durchkontaktierung. Seien Sie hier besonders vor- 
sichtig, damil keine ungewollte Verbindung entsteht. 

Wenn die V24-Buchse ohne Befestigunswinkel eingesetzt wird, sichern Sie vorher die 
beiden Löcher der Buchse mit zwei kleinen Schrauben oder Nieten. Es ist vorgekom- 
men, daß die beiden Blechteile auseinander gehen und die Buchse sich dann in ihre vie- 
len Einzelteile zerlegt. 

Sehen Sie zum Schluß alle Lötstellen noch einmal nach. Am besten mit der Lupe. Ach- 
ten Sie auch auf vergessene Lötstellen, denn diese können besonders interessante 
Fehler erzeugen. 

Für den ersten Test werden je nach Schnittstelle der 68681 oder der 68230, die beiden 
RAMSs am oberen Platinenrand und die AD- bzw. DA-Wandler nicht benötigt. Im Sinne 
einer Risikominimierung sollten diese ICs erst gesteckt werden, wenn der Rechner 
grundsätzlich funktioniert. 

Wenn Sie bis hierher alles sorgfältig erledigt haben, können Sie nun Abschnitt 2.1 lesen 
und dort weitermachen. Wir drücken Ihnen die Daumen. 
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ICs 
MC68000 
MC68230 
MC68681 
NE555 
MC1488' 


Baman 


MC1489 
741504 
74LS10 
741532 
7415139 
7415157 


BED -nD—-—--DN 


6264°1C17-IC20 


Widerstände: 


180K 
Array 7X3K3 
Array4X 10K 


.o2nn-- 
[1 
© 
oO 


Kondensatoren: 
1 100nF 
1 6n8 
2 10uF 10V 
2 10p 
16 100nF 


IC-Sockel: 

64 polig 

48 polig 

40 polig 

28 polige 
18 polig 

16 polig 

14 polige 
8polig 


-40O0D-09—.-. 


Pfostenfeldstecker 
2-reihig: 
1 34 Stifte 
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27128? 1C15,1C16 


5.4 Teile-Liste 


IC5,IC6 


IC7,1C8 
1091 

IC10 

IC11 
IC12,1C13 
1C14 


Netzwerk1i 
Netzwerk2 
(kann entfallen) 


sonstiges: 


1 Quarz8 MHz 

1 Quarz 3.6864 MHz 

8 Jumper 

10Lötnägel Imm, event. Spezialkabel mit 
Buchse/Stecker 

1 Reset-Taster, normal offen 

25-polige SubD-Buchse 


20 Stifte 
14 Stifte 
12 Stifte 
10 Stifte 
8Stifte 


-0O0n-- 


1) event. 2X 741500, siehe hierzu Abschnitt 2.1 
2) im Bausatz enthalten, werden mit der Platine geliefert 
3) verschiedene Bestückung möglich, siehe hierzu Abschnitt 5.2 


5.5 ... läuft nicht, was nun? 


Wenn Sie die C’T KAT-Ce fertig gekauft haben, kann der Fehler nur in der Umgebung 
des Rechners liegen. Bitte überprüfen Sie deshalb zuerst die Spannungsversorgung 
des Rechners. Die +5 Volt müssen zwischen +4,75 und 5,25 Volt liegen und auch der 
'Brumm' muß sich innerhalb dieser Grenzen halten. 


Soll die C'T KAT-Ce mit dem Terminalrechner über die serielle Schnittstelle korrospon- 
dieren, so muß wie in 2.1 beschrieben die Spannungsversorgung an den +-12 Volt 
Anschlüssen zum Typ des Sendebausteins (1488 oder 741S00) passen. Falls dies in 
Ordnung ist, messen Sie noch die Spannung an Pin 20 der V24-Buchse. Hier muß, auch 
ohne angeschlossenes Kabel zum Terminal, eine Spannung größer 2,5 Volt messbar 
sein. Diese Spannung geht auf Low-Pegel (0 oder unter O Volt), wenn Sie die Rest-Taste 
gedrückt halten. 

Wenn bis hierher alles richtig funktioniert, kann der Fehler nur noch in der Pinbelegung 
des V24-Steckers oder im Terminal liegen. Die Pinbelegung der Buchse ist in 5.6.4 
beschrieben und in 5.6.1 näher erläutert. Ist am Terminal eine serielle Schnittstelle vor- 
handen, hat die Buchse ım Normalfall die gleiche Belegung. Ein Zwischenstück muß 
dann für die richtige Pin-Pin-Verbindung sorgen. Bewährt hat sich folgende Schaltung: 


Pin Pin 
2 mit 3 TxD mit RxD 
3mit 2 RxD mit TxD 
4mit5 ATS mit CTS 
5mit4 CTSmit RTS 
7mit7 GND 
8 mit 20 DCD mit DTR 
20 mit8 DTRmitDCD 


Eine Ausnahme bildet das in 2.2 gezeigte PRODOS-Kabel für APPLE-Anwender. Falls 
„Sie damit arbeiten, benötigen Sie kein Zwischenstück. 

Läuft immer noch nicht? 

Wenn Sie als Selbstbauer die obigen Zeilen gelesen haben und die Spannung an Pin 20 
“ der V24-Buchse geht mit der Reset-Taste auf und ab, so funktioniert die C'T KAT-Ce 
sicher. Die Initialisierung der Schnittstelle erfolgt nämlich per Software und bis dahin ist 
schon eine ganze Menge gelaufen. Sollte sich an Pin 20 nichts bewegen, müssen Sie 
etwas tiefer einsteigen. : 

Prüfen Sie zunächst die Stromaufnahme der unbestückten Karte. Nach dem Aufladen 
der Kondensatoren darf kein nennenswerter Strom mehr fließen. Setzen Sie dann die 
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TTL-ICs ein und messen Sie an Pin 8 des 74LS04 die Taktfrequenz. Wenn Sie nur ein 
Multimeter besitzen: nehmen Sie einen 1K Widerstand in die Tastspitze und messen 
darüber die Spannung. Der gemessene Wert sollte bei 2 Volt liegen. Auf dem Oszillogra- 
phen zeigen sich 8 MHz mit Tastverhältnis 1:1. Pin 10 des 741504 treibt das Reset- 
Signal. Es muß ca. 4 Volt betragen und bei gedrückter Reset-Taste auf O Volt gehen. 
Setzen Sie nun die CPU, die ROMs und RAMs und je nach Schnittstelle zum Terminal 
den 68681 (seriell) oder den 68230 (parallel) ein. Achten Sie bei den ROMs auf HundL 
und seien Sie beim Stecken der Jumper besonders sorgfältig. Wenn der Rechner nun 
nicht läuft und Sie nur ein Multirneter besitzen, bleibt auch Ihnen nur die Inanspruch- 
nahme fremder Hilfe. 
Mit dem Oszillographen läßt sich noch der ganze Rechner durchmessen. Anhand von 
5.1 können Sie mit etwas Background die Arbeitsweise verstehen. 
Prüfen Sie zunächst das CS-Signal an Pin 35 des 68681 oder Pin 41 des 68230. Jenach 
gewünschter Schnittstelle muß einer dieser Bausteine alle 3 bis 4 Mikrosekunden abge- 
fragt werden. Ist dort nichts vorhanden, sollte man das Signal Adress-Strobe an Pin 2 
des Testfeldes ansehen. Hier muß reges unregelmäßiges Auf und Ab zu sehen sein. 
Auch auf dem Datenbus herrscht reges Treiben, die Pinbelegung der CPU können Sie 
übrigens dem Schaltplan entnehmen. 
Wenn Sie dennoch nicht weiterkommen, können Sie den Reparaturservice des Herstel- 
lers in Anspruch nehmen. Die Adresse lautet: 

Firma 

M.T. Himmeröder 

Longbentonstr. 12 

4353 Oer-Erkenschwick 

Der Preis beträgt pauschal DM 89,- zuzüglich evtl. nötiger Bauteile. 


5.6 Die Schnittstellen 
5.6.1 Funktion der Schnittstellen 


Die Programmierung der Schnittstellen-Bausteine ist mit allen Feinheiten nur anhand 
der Datenblätter möglich. Weil diese weit über 100 Seiten Umfang haben, können wir 
hier nur auf die elementaren Funktionen beispielhaft eingehen. Interessierten möchten 
wir deshalb die Anschaffung der Datenblätter (nicht ganz einfach) oder den Kauf eines 
Buches empfehlen. 

Die Ports des 68230 lassen sich ohne große Vorbereitung zur Ausgabe von Binärmu- 
stern verwenden. Soll die C'T KAT-Ce z.B. einen Schrittmotor an Port A steuern, somuß 
nur das Datenrichtungsregister (DDRA) geladen werden. Ein kleines Beispielprogramm 
kann dies verdeutlichen. Es gibt an Port A abwechselnd $00 und $FF aus. Die Hands- 
hake-Leitungen bleiben unbenutzt. Die sich ergebende Rechteckschwingung kann an 
Pin 2 bis 9 von Port A mit dem Oszillographen beobachtet werden. Das Programm wird 
mit der Reset-Taste beendet. 


DDRA EQU $400001 
PORTA EQU $400011 

MOVE.B #$FF,DDRA ‚ Datenrichtung auf Ausgabe 
LOOP MOVE.B #$00,PORTA 

MOVE.B #$FF,PORTA 

BRA LOOP 
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An der Frequenz der Schwingung läßt sich erkennen, wie schnell die C’T KAT-Ceist. Die 
Schleife wird etwß 600.000 mal pro Sekunde durchlaufen. 

Ein weiteres Beispiel zeigt die Datenausgabe über Port A unter Berücksichtigung der 
Handshake-Leitungen. Die Datenausgabe eines Bytes wird nun durch einen negativen 
Impuls an Pin 1 von Port A angezeigt und muß mit einem Low/High Übergang an Pin 10 
bestätigt werden. Für unser Beispiel läßt sich dieses Handchake am besten durch Ver- 
binden von Pin 1 und 10 simulieren. Ferner wird alle 100000 Schleifendurchläufe die 
Tastatur abgefragt. Das Programm kann dadurch per Tastendruck beendet werden. 
KEYPRESS EQU $800110 


PCR EQU $400001 ‚allg. Port-Control-Register 
PACR EQU $40000D ‚Port AControl-Register 
DDRA EQU $400005 ‚ Datenrichtungs-Register 
PORTA EQU $400011 ;Ausgabe-Port 


MOVE.B #%00010000,PCR ;unidirektional 8 Bit, H1 H2 enable 
MOVE.B #%01111000,PACR ; Submode 01, H2 pulsed H-Chake-Outp. 
MOVE.B #+$FF,DDRA 
MOVEQ #$00,D1 
MOVEQ #$FF,D2 
LOOP1 MOVE.L #100000,D3 
LOOP2 MOVE.B D1,PORTA 
MOVE.B D2,PORTA 
SUBA.L #1,D3 


BNE LOOP2 
JSR KEYPRESS 
CMPI +#0,DO 
BEQ LOOP1 
RTS 


Das nächste Beispiel zeigt eine Anwendung des im 68230 enthaltenen Timers. Die 'Zeit- 
messung’ in diesem Timer erfolgt durch Abwärtszählen des im Count-Registers enthal- 
tenen Wertes. Erreicht der Zählerstand Null, wird ein Flag gesetzt und das Count-Regi- 
ster mit dem Inhalt des Preload-Registers nachgeladen. Count- und Preload-Register 
sind jeweils 3 Bytes lang. Der Zähltakt beträgt 1/32 des System-Taktes, in unserem Fall 
also 4 Mikrosek. Im folgenden Programm wird mit Hilfe des Timers eine in den Feldern 
STUNDE, MINUTE und SEKUNDE vorgegebene Zeit im Sekundentakt weitergezählt 
und auf dem Bildschirm ausgegeben. Drücken einer beliebigen Taste beendet das Pro- 


gramm. 
TCR EQU $400021 ; Timer Control Register 

CPRH EQU $400027 ; Preload Register 
CPRM EQU $400029 

CPRL EQU $40002B 

CNTRH EQU $40002F ; Count Register 
CNTRM EQU $400031 

CNTRL EQU $400033 

TSR EQU $400035 ; Timer Status Register 
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KEYPRESS 
ASCIOUT 
CLBILD 
GOTOXY 


STUNDE 
MINUTE 
SEKUNDE 


PROGANF 


TIMEOUT 


WAIT 
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$800110 
$800124 
$80013C 
5800148 


PROGANF 


19 
36 
00 


CLBILD 


#250000,D0 
CPRH-2,AO 
DO,0(A0) 
#%01000001,TCR 


#$0A10,D1 
GOTOXY 


#='',D2 
STUNDE,D1 
DUALDEZ 
MINUTE,D1 
DUALDEZ 
SEKUNDE,D1 
DUALDEZ 


KEYPRESS 
#0,DO 
ENDE 


TSR,DO 
WAIT 
DO,TSR 


#1,SEKUNDE 
+60,SEKUNDE 
TIMEOUT 
SEKUNDE 
#1,MINUTE 
#60,MINUTE 
TIMEOUT 
MINUTE 
#1,STUNDE 
#24,STUNDE 


; hier Startzeit 
; vorgeben 


‚ Schirm löschen 


;250000X 4 = 1 Sek. 


;250000 $ Preload Register 
;PC3 = TOUT, Timer enable 


; Cursor $ Spalte 10, Zeile 16 


‚Ausgabe der Zeit$ Schirm 


‚auf Flag warten 
; Flaglöschen 


‚ Zeit weiterzählen 


BRA 


DUALDEZ 


ENDE 


BNE TIMEOUT 


CLR.B STUNDE 

TIMEOUT 

ANDI.L #$000000FF,D1 ; D1 DUAL % DEZ konvertieren 
DIVU #10,D1 

MOVE.B D1,D0 

ORI.B :#’0',DO ; Nibble $ ASCII 

JSR ASCIOUT ;1.Ziffer$ BS 

SWAP D1 

MOVE D1,DO 

ORI.B #'0',DO 

JSR ASCIOUT :2.Ziffer$ BS 

MOVE.B D2,DO 

JSR ASCIOUT ; Punkt oder Blank $ BS 
RTS 


Bei der seriellen Datenübertragung hat sich ein Standard eingebürgert, der bei der 
Benutzung der Monitorroutinen problemlos genutzt werden kann. Aus diesem Grund 
beschränken wir uns darauf, bei den seriellen Schnittstellen die Bedeutung und die 
Besonderheiten der Signalleitungen zu erläutern. 

An der 25 poligen V24-Buchse der C’T KAT-Ce sind Anschlüsse wie folgt belegt: 


Pin2: 


Pin 3: 


Pin4: 


Pins: 


Pin?: 


Pine: 


Pin 20: 


TxD 

Ausgabe der Daten. Es werden je Byte 1 Startbit, 8 Datenbits mit LSB 
vorweg, und 1 Stoppbit gesendet. 

RxD 

Eingang zum Empfang der Daten. Als Datenformat gilt 1 Startbit, 8 
Datenbits mit LSB vorweg und 1 Stoppbit als vereinbart. 

RTS 

High-Pegel an diesem Ausgang zeigt an, daß die C'T KAT-Ce bereit ist, 
Daten zu empfangen. 

CTS 

An diesem Eingang signalisiert der Empfänger der Gegenseite durch 
High-Pegel, daß die Ct KAT-Ce Daten senden kann. 

GND 

DCD 


‘An diesem Eingang meldet ein angeschlossenes Modem durch Anlegen 


von High-Pegel, daß das Trägersignal erkannt wurde. Falls nicht mit 
einem Modem gearbeitet wird, ist diese Leitung im Stecker mit Pin 20 zu 
verbinden. 

C'T KAT-Ce meldet sich durch High-Pegel bereit. 


Für die Schnittstelle SERIELL2 gelten die oben gemachten Angaben entsprechend. Die 
Pinbelegung dieser Schnittstelle kann unter 5.6.4 nachgesehen werden. 


Für die Bedienung des AD- und des DA-Wandlers sind im Monitor geeignete Routinen 
vorhanden. Hier noch einige Worte zur Äußeren Beschaltung dieser Wandler. 
Der DA-Wandler liefert an seinem Ausgang für den Digitalwert O bis 255 eine Spannung 
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von O bis 2,55 Volt. Der Innenwiderstand des Ausgangs wird im Datenblatt mit 4K ange- 
geben. Andere Ausgangsspannungen können mit einem externen Verstärker erzeugt 
werden. In dem hierzu gezeigten Schaltungsvorschlag kann mit dem Potentiometer die 
Verstärkung eingestellt werden. Die hochohmige Ankopplung an den DA-Wandler eli- 
miniert dessen Innenwiderstand weitgehend. 


Ausgangsverstärker für DA-Wandler 


5,1K 20K 
GND(A)— |) BEE 


>Ausgang 
DA-Out(6)< 


Die Verstärkung ist 1:4 regelbar. 


Der AD-Wandler ist für eine Eingangsspannung von 0 bis 2,55 Volt ausgelegt. Die Kon- 
vertierung in den entsprechenden Digitalwert O bis 255 dauert 14 Mikrosekunden. Der 
Eingangswiderstand beträgt 100K und die zulässige Eingangsspannung -0,5 bis +3,5 
Volt. 

Eine Änderung des Eingangsspannungs-Bereiches ist durch einen vorgeschalteten 
Spannungteiler möglich. Die Zeichnung gibt an, wie es geht. 


Eingangsspannungsteiler für AD-Wandler 


>(5)Vin 
Ri R2 R3 
Eingang< >(4)GND 
1M 680K 
>(3)Vref 


Eingangsspannungsbereich 


+5 Volt +10 Volt 
Ri = 5K Ri = 10K 
R2 = 5,6K R2 = 12K 
R3 = 8,2K R3 = 5,6K 


Da die Eingangsspannung den Bereich -0,5 bis +3,5 Volt nicht überschreiten darf, istes 
sinnvoll und genauer, einen Verstärker vorzuschalten. 

Der Eingangsspannungs-Bereich kann auch nullsymetrisch aufgeteilt werden. Wie die 
Zeichnung zeigt, geschieht dies durch Anheben des Wandlereingangs. Daraus folgt, 
daß der gelieferte Digitalwert um $80 zu groß ist. Um den richtigen Wert mit Vorzeichen 
zu erhalten, muß man also $80 subtrahieren oder das MSB invertieren. 


Eingangsspannungsteiler für bipolare Anwendung 


>(5)Vin 
R1 R2 R3 "R4 
Eingang< >(4)GND 
7,5K 
>(3)Vref 


Eingangsspannungsbereich 


+/-5 Volt +/-10 Volt 

Ri = 5K RI = 10K Abgleich -Umax 
R2 = 12K R2 = 27K 

R3 = 5K R3 = 5K Abgleich +Umax 
R4 = 12K R4 = 8,2K 


5.6.2 Interrupt-Steuerung 


Zur Auslösung von Interrupts besitzt der MC68000 die Eingänge IPLO, IPL1 und IPL2. 
Die Signale an diesen Eingängen, Low-Pegel wird als 1 gewertet, werden vom Prozes- 
sor als Binärzahl interpretiert und es können somit Interrupt-Anforderungen von 7 ver- 
schiedenen Quellenbearbeitet werden. Dies setzt aber voraus, daß ein Prioritätsenko- 
der (74148) die 7 Leitungen zu 3 Bit codiert. 

Im ROM ist diesen Anforderungen ein Vektor mit 7 Adressen zugeordnet. Kommt es zu 
einern Interrupt, so wählt der Prozessor anhand von IPLO bis IPL2 eine Adresse aus und 
setzt das Programm an dieser Stelle fort. 

Auf den Prioritätsenkoder wurde bei der C’T KAT-Ce verzichtet. Statt dessen sind über 
Jumper 3 Interruptleitungen direkt auf die IPL-Eingänge gelegt. Das Jumperfeld befin- 
det auf der Platine parallel zu den CPU-Pins 27 bis 32. 

Die Jumper sind bei Bedarf wie folgt zu stecken: 


Postion Verbindung Wertigkeit 
1 PCS/PIRQ(68230) PIPL2 4 

2 keine Verbindung 

E) PCI/TOUT(68230) PIPL1 2 

4 keine Verbindung 

5 INTAN(68681) $ IPLO 1 

6 keine Verbindung 
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Unter der Voraussetzung, daß immer nur eine Leitung auf Low geht, werden aus dem 
Interrupt-Vektor nur die Adressen 1, 2 oder 4 ausgewertet. Die übrigen Adressen kom- 
men nur dann zum Zuge, wenn 2 oder 3 Leitungen gleichzeitig ein Signal führten. In 
unserem Falle bedeutet das, daß 2 oder 3 Signale gleichzeitig eine Interrupt-Anforde- 
rung gestellt haben. Wenn dieser Fall auftritt, müssen wir entscheiden, in welcher Rei- 
henfolge die Anforderungen bearbeitet werden. Damit geben wir den Interrupt-Quellen 
eine Priorität. 
Ordnen wir den Bearbeitungs-Routinen für die drei InterruptQuellen INTRN(68681), 
TOUT(68230) und PIRQ(68230) die Namen A, B und C zu, so sind folgende Prioritäten 
möglich: 

ABC ACB BAC BCA CAB CBA 
Abhängig von der gewählten Priorität können Sie aus der nachfolgenden Tabelle erse- 
hen, welche Bearbeitungsroutinen in welcher Reihenfolge bei welchem Interrupt ausge- 
führt werden müssen. 


IRQ PRIORITÄT 

Wert Vektor-Adr. ABC ACB BAC BCA CAB CBA 
1 $64 A A A A A A 

2 $68 B B B B B B 

3 $6C AB AB BA BA AB BA 

4 $70 c c c c c c 

5 $74 AG AC AC CA CA CA 
6 $78 BC CB BC BC CB CB 

7 $7C ABC ACB BAC BCA CAB CBA 


Zur Verdeutlichung der Interruptbearbeitung wurde als Beispiel wieder ein kleines Uhr- 
zeit-Programm gewählt, nur daß jetzt ein laufendes Programm jede Sekunde zum Wei- 
terzählen und zur Ausgabe der Zeit unterbrochen wird. Sollten Sie ein ähnliches Pro- 
blem programmieren wollen, so beachten Sie bitte, daß gleiche Monitor-Routinen nicht 
im Haupt- und Interruptprogramm gleichzeitig verwendet werden dürfen. Das hat näm- 
lich zur Folge, daß die Routinen per Interrupt unterbrochen und dann während der 
Unterbrechung erneut angesprungen werden. DB die Monitor-Routinen weder 'reente- 
rable' noch gegen Unterbrechungen geschützt sind, muß diese Anwendung vermieden 
werden. 

Das Zeitprogramm löscht zuerst den Bildschirm, stellt den Interruptzeiger für IPL1 und 
startet den Timer. Er ist jetzt so programmiert, daß die TOUT-Leitung (Timer Out) bei 
jedem Nulldurchgang des Zählers solange auf Low geht, bis das Flag im Timer-Status- 
Register vom Programm wieder gelöscht wird. Danach zählt das Programm in einer 
Schleife ein Register hoch und gibt den Wert über Port A aus. Zusätzlich wird jede 
Sekunde die Tastatur abgefragt. Ein Tastendruck beendet das Programm. DB der Timer 
auch nach Beendigung des Programms weiterläuft, unterbindet das Programm vor sei- 
ner Beendigung weitere Interrupts durch Setzen der entsprechenden Bits im Statusre- 
gister der CPU. Mehr hierzu im Datenblatt. 


DDRA EQU $400005 
PORTA EQU $400011 
TOR EQU $400021 ; Timer Control Register 
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CPRH EQU 
TSR EQU 


INTVEKT EQU 
KEYPRESS EQU 
ASCIOUT EQU 


CLBILD EQU 
GOTOXY EQU 


STUNDE DC.B 
MINUTE DC.B 
SEKUNDE DC.B 


INTFLAG DC.B 


PROGANF JSR 


ENDLOS 


$400027 
$400035 


; Preload Register 
; Timer Status Register 


$68 


$800110 
$800124 
$80013C 
$800148 


PROGANF 


18 ; hier Startzeit 
25 ‚vorgeben 


CLBILD ‚ Bildschirm löschen 
#INTERRUPT,INTVEKT ; Zeiger $ IRQ-Rout. 
#$FF,DDRA ‚Port Aauf Ausgabe 


#250000,DO 
CPRH-2,AO 
D0,0(A0) 
#%11100001,TCR 


; Timer Starten 


#%1111100011111 111,SR; IRQ freigeben 


D1 

#1,D1 
D1,PORTA 
#0,INTFLAG 
ENDLOS 
INTFLAG 
KEYPRESS 
#0,DO 
ENDLOS 
#%0000011100000 000,SR ; IRQ sperren 


; IRQ gewesen ? 


; Beginn der Interrupt-Bearbeitung 


INTERRUPT MOVEM.L 
MOVE.B 
ADDI.B 
CMPI.B 
BNE 
CLR.B 


AO-A6/DO-D7,-(SP) ;Registerretten 


#1,TSR ; Timer Flag löschen 
#1,SEKUNDE ; Zeit weiterstellen 
#60,SEKUNDE 

TIMEOUT 

SEKUNDE 
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ADDI.B #1,MINUTE 
CMPI.B #60,MINUTE 


BNE TIMEOUT 
CLR.B MINUTE 
ADDI.B #1,STUNDE 
CMPI.B +#24,STUNDE 
BNE TIMEOUT 
CLR.B STUNDE 

TIMEOUT MOVE #$0A10,D1 
JSR GOTOXY 


MOVE.B #'.',D2 
MOVE.B STUNDE,D1 


JSR DUALDEZ 
MOVE.B MINUTE,D1 
JSR DUALDEZ 


MOVE.B #'',D2 
MOVE.B SEKUNDE,D1 


JSR DUALDEZ 

MOVE.B #$FF,INTFLAG ; Flag für Hauptprogramm 

MOVEM.L _ (SP)+,AO-A6/DO-D7 

RATE ‚retour zum Hauptprogramm 
DUALDEZ ANDI.L #S000000FF,D1 

DIVU #10,D1 

MOVE.B D1,DO 

ORI.B #'0',DO 

JSR ASCIOUT 

SWAP D1 

MOVE.B D1,D0 

ORI.B #'0',DO 

JSR ASCIOUT 

MOVE.B D2,DO 

JSR ASCIOUT 

ATS 


Bitte beachten Sie, daß in Position 3 des Jumperfeldes ein Jumper gesteckt werden 


muß. 


5.6.3 Register der Schnittstellen-Bausteine 


68230 $400001: Port General Control Register 
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$400003: Port Service Request Register 
$400005: Port A Data Direction Register 
$400007: Port B Data Direction Register 
$400009: Port C Data Direction Register 


68681 


$40000B: Port Interrupt Vector Register 
$40000D: Port A Control Register 
$40000F: Port B Control Register 
$400011: Port A Data Register 

$400013: Port B Data Register 

$400015: Port A Alternate Register 
$400017: Port B Alternate Register 
$400019: Port C Data Register 

$40001B: Port Status Register 

$40001D: ---------- 

$40001F: ---------- 

$400021: Timer Control Register 
$400023: Timer Interrupt Vector Register 
$400025: ---------- 

$400027: Counter Preload Register (High) 
$400029: Counter Preload Register (Mid) 
$40002B: Counter Preload Register (Low) 


$40002D: ---------- 

$40002F: Count Register (High) 
$400031: Count Register (Mid) 
$400033: Count Register (Low) 
$400035: Timer Status Register 


beim Lesen 

$402001: Mode Reg. A (MR1A, MR2A) 
$402003: Status Register A (SRA) 
$402005: Reserved 

8402007: RX Holding Reg. A(RHRA) 
$4020089: Inp.Port Change Reg.(IPCR) 
$40200B: Interrupt Status Reg.(ISR) 
$40200D: Counter/Timer Upper (CTU) 
$40200F: Counter/Timer Lower (CTL) 
$402011: Mode Reg. B(MR1B, MR2B) 
$402013: Status Register B (SRB) 
$402015: Reserved 

$402017: RX Holding Reg. B(RHRB) 
$402019: Interrupt Vector Reg.(IVR) 
$40201B: Input Port 

$40201D: Start Counter Command 
$40201F: Stop Counter Command 


beim Schreiben 

Mode Reg. A (MR1A, MR2A) 
Clock Select Reg. A(CSRA) 
Command Register A (CRA) 
TX Holding Reg. A(THRA) 

Aux. Control Reg. (ACR) 
Interrupt Mask Reg. (IMR) 

C/T Upper Register (CTUR) 
C/T Lower Register (CTLR) 
Mode Reg. B(MR1B, MR2B) 
Clock Select Reg. B(CSRB) 
Command Register B(CRB) 
TX Holding Reg. B(THRB) 
Interrupt Vector Reg.(IVR) 
Output Port Conf.Reg.(OPCHR) 
Set Output-Port Bits Command 
Res. Outp.-Port Bits Command 
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5.6.4 Pinbelegung der Schnittstellen 


68230 Port A Printer-Anschluß 
1H2 ;Strobe 11 GND 
2 PAO ‚DO 12 GND 
3 PA1 ‚D1 13 GND 
4 PA2 ‚D2 14 GND 
5 PA3 ;D3 15 GND 
6 PA4 ‚D4 16 GND 
7 PAS ‚D5 17 GND 
8 PA6 ‚D6 18 GND 
9 PA7 ‚D7 19 GND 
10 H1 ‚ACKNLG,inv. 20 NC 
68230 Port B 1 +5 Volt 8 +5 Volt 
2 PB1 9 PBO 
3 PB3 10 PB2 
4 PB5 11 PB4 
5 PB? 12 PB6 
6 HA 13 H3 
7 GND 14 GND 
68230 Port C 1 PC6 ‚PIACK,inv. 6 PC? ;TIACK,inv. 
2 PC4 ;DMAREQ;inv. 7 PC5 ;PIRQ, inv. 
3 PC2 ;TIN 8 PC3 ;TOUT 
4 PCO 9 PC1 
5 GND 10 GND 
68681 ser. A 1 1P4 ;ClockInp. R 6 OP2 ;ClockOutp. T 
2 IP3 ‚Clockinp. T 7 PO ‚CcTSs 
3 GND 8 OP0O  ;RTS 
4 NC 9 RxDA ;RxD 
5 OP4 ‚DTR 10 TXDA ;TxD 
68681 ser.B 1 NC 2 TxDB ;TxD 
3 RxDB ‚RxD 4 OP1 ‚ATS 
5 IP1 ;‚CTS 6 NC 
7 GND 8 IP5  ;Clockinp.T 
9 NC 10 NC 
11 NC 12 IP2 _;ClockInp.R 
13 NC 14 NC 
15 NC 16 NC 
17 NC 18 NC 
19 NC 20 OPf5 ;DTR 
21 NC 22 NC 
23 NC 24 OP3 _;ClockOutp. R/T 
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AD- und DA-Wandler 


1 +5Volt 6 DA-Outp. 

2 VREFDA 7 -12 Volt 

9 VREFAD 8 +12 Volt 

4 GND 9 OP6 (68681) *) 
5 AD-Inp. 10 AD-Busy,inv. 


*) mit OP6(68681) kann event. ein externer Schalter bedient werden, z.B. Multiplexer. 


Expansionsschnittstelle 


1 D3 18 D4 
2 D2 19 D5 
3 D1 20 D6 
4 DO 21 D7 
5 A11 22 Ai 
6 Reset,inv. 23 A2 
7 IPL1 24 A3 
8 ExpSel,;inv. 25 A4 
9 PRW,iinv. 26 A5 
10A10 27 A6 
11A9 28 A7 
12E-Clock 29 AB 
13A13 30 A12 
14+5 Volt 31 GND 
15+5 Volt 32 GND 
16+5 Volt 33 GND 
17+5 Volt 34 GND 
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Der Monitor der C’T KAT-Ce 


Wie vieles im Leben wird der Monitor im Laufe der Zeit einige Wandlungen durchlaufen. 
Aus diesem Grund kann hier nicht die jeweils aktuelle Version abgedruckt werden. 
Sogar die beiden Eprom Ausführungen parallel bzw. seriell verändern die gesamten 
Adressen. 

Es ist allerdings abzusehen, daß viele Konstanten unverändert bleiben und auch die 
Sprungtabelle in ihrer Form erhalten bleiben wird. 

Damit steht fest, daß allenfalls weitere Konstanten und Sprünge hinzugefügt werden, 
was im einzelnen jeweils dokumentiert werden muß. 

Weil nun bei jeder Änderung alle Adressen hinter der neu gefaßten Stelle neue Werte 
bekommen, ist es nicht sinnvoll, die Routinen incl. des erzeugten Codes abzudrucken. 

Wir haben daher, abgesehen von den Konstanten und der Sprungtabelle, die in über- 
setzter Form unten abgedruckt sind, nur das Textfile des zur Zeit der Drucklegung aktu- 
ellen Fassung unten wiedergegeben. Es ist davon auszugehen, daß die meisten Routi- 
nen auch zukünftig im wesentlichen bestehen bleiben, so daß mithilfe der Sprungtabelle 
auch bei neuer Adressenlage die gewünschte Stelle schnell aufgespürt werden kann. 


Anhang 
000000: ‚oererermenterereren nen srerneten 
000000: se : 
000000: sn KAT-Ce BOOTROM 
000000: S V=000008 . 
000000: ” 23.07.86 x 
000000: = 5 
000000: serersterrerenenen sn annnennnne 
000000: , 
000000: Parallel EQU 1 
000000: M 
000000: RAMSTART EQU $000000 
000000: STARTERN EQU $800000 
000000: 


000000:00000A00 STACKPTR EQU RAMSTART+$000A00 
000000:00020000 RAMMAX EQU RAMSTART+$020000 
000000:00003FFC zwei6264 EQU RAMSTART+S$3FFC 
000000:00007FFC vier6264 EQU RAMSTART+$7FFC 
000000:0000FFFC zwei43256 EQU RAMSTART+S$FFFC 
000000:0001FFFC vier43256 EQU RAMSTART+$1FFFC 
000000:00018000 CodeStMax EQU RAMSTART+$18000 
000000: F 

000000:12345678 RESETB EQU $12345678 ;EOR MIT RESETADR 
000000: ; 

000000: ’ 
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000000: 

000000: 
000000:00000000 
000000:00000100 
000000:00000300 
000000:00000301 
000000:00000302 
000000:00000304 
000000:00000305 
000000:00000306 
000000:0000030A 
000000:0000035A 
000000:0000039A 
000000:0000039C 
000000:000003A0 
000000:000003A2 
000000:000003A4 
000000:000003A8 
000000:000003AC 
000000:000003AD 
000000:000003AE 
000000:000003B0 
000000:00000384 
000000:000003B8 
000000:000003BC 
000000:000003C0 
000000:000003C4 
000000:000003C8 
000000: 
000000:000003CC 
000000: 

000000: 

000000: 

000000: 

000000: 

800000: 
800000:00000A00 
800000:008001D4 
800000:008008B4 
800000:00800D22 
800000:00800D2A 
800000:008008B4 
800000:008008B4 
800000:008001CC 
800000:008008B4 
800000:00800A5C 
800000:00800D2A 
800000:00800D2A 
800000:008008B4 
800000:008008B4 
800000:00800884 
800000:008008B4 


‚RAM Adressvektoren 


Exceptions 
DISKB 
serbBaud 
seraBaud 
FileFlags 
ymax 

xmax 
StartA7 
BUFFER 
REGSAV 
STATSAV 
REGFLAG 
MONFLAGS 
SAVER 
ZNUMMER 
OUTVECT 
YKOORD 
XKOORD 
BILDGR 
OFFSET 
TEXTSTART 
RAMENDE 
CODESTART 
AOSPEICH 
RESETCMP 
RESETADRA 


NachMonVar 


EQU RAMSTART 
EQU exceptions+$100 
EQU DiskB+$200 
EQU serbBaud+1 
EQU seraBaud+1 
equ FileFlags+2 
equ ymax+ı 

EQU xmax+1 

EQU StartA7+4 
EQU BUFFER+80 
EQU REGSAV+$40 
EQU STATSAV+2 
EQU REGFLAG+4 
EQU MONFLAGS+2 
EQU SAVER+2 
EQU ZNUMMER+4 
EQU OUTVECT+4 
EQU YKOORD+ 
EQU XKOORD+ 
EQU BILDGR+2 
EQU OFFSET+4 
EQU TEXTSTART+4 
EQU RAMENDE+4 
EQU Codestart+4 
EQU AOSPEICH+4 
EQU RESETCMP+4 


EQU ResetAdr+4 


‚niedrigste RAM-Adresse 
‚merkt sich die Baudrate vor Reset 
‚setzt Bits fuer geoeffnete Files 
max x-Koord. 


‚max y-Koord. 


‚fuer Eingabe einer Textzeile 
‚Speicherplatz fuer 68000 Register 


‚Adressen mit 'RIEN'sind vorlaeufig nicht definiert 
‚und verzweigen zur Begruessungsmeldung der KAT-Ce 


ORG STARTADR 
; MC 68000 Vector Tabelle 
DC.L STACKPTR 


DC.LPREINIT 
DC.LRien 
DC.LADRERR 
DC.LILLINSTR 
DC.Lrien 
DC.Lrien 
DC.LTRAP 
DC.Lrien 
DC.LTRACEIt 
DC.LILLINSTA 
DC.LILLINSTR 
DC.LRien 
DC.L Rien 
DC.LRien 
DC.LRien 


;Busfehler nicht existent 


;ZERDIV 
:CHK 
;TRAPV 


;Privilegierte Verletzung 


‚Trace 
;EM1010 
‚EM1111 
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800000:00800884 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008001CE 
800000:008001CE 
800000:008001CE 
800000:00B8001CE 
800000:008001CE 
800000:008001CE 
800000:008001CE 
800000:008001CE 
800000:00800A3A 
800000:00800A4C 
800000:008001CC 
800000:008001CC 
800000:008001 CC 
800000:008001CC 
800000:008001CC 
800000:008001CC 
800000:008001CC 
800000:008001CC 
800000:008001CC 
800000:008001CC 
800000:008001CC 
800000:008001CC 
800000:008001CC 
800000:008001CC 
800000: 
800000: 
800000: 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000:008008B4 
800000: 
800000: 
800000: 
800000:00000468 
800000:000003F0 
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DC.LRien 
DC.LRien 
DC.LRien 
DC.LRien 
DC.LRien 
DC.LRien 
DC.LRien 
DC.LRien 
DC.L INTERRUPT 
DC.L INTERRUPT 


‚unechter Interrupt 
‚Level 1 


DC.L INTERRUPT ;Level2 
DC.L INTERRUPT ;Level9 
DC.L INTERRUPT ;Level4 
DC.L INTERRUPT ;Level5 
DC.L INTERRUPT ;Level6 
DC.L INTERRUPT ;Level7 
DC.LTRACEAUS ;TRAP #0 
DC.L TRACEEIN  ;TRAP #1 
DC.LTRAP ;TRAP #2 
DC.LTRAP ;TRAP #3 
DC.LTRAP ;TRAP #4 
DC.LTRAP ;TRAP #5 
DC.LTRAP ;TRAP #6 
DC.LTRAP ;TRAP #7 
DC.LTRAP ‚TRAP #8 
DC.LTRAP :TRAP #9 
DC.LTRAP :TRAP #10 
DC.LTRAP ;:TRAP #11 
DC.LTRAP ;TRAP #12 
DC.LTRAP ;:TRAP #13 
DC.LTRAP ;TRAP #14 
DC.LTRAP :TRAP #15 
‚fuer spaetere Anwendungen: 
DC.LRien 

DC.LRien 

DC.LRien 

DC.LRien 

DC.LRien 

DC.LRien 

DC.LRien 

DC.LRien 

DC.LRien 

DC.L Rien 

DC.LRin 

DC.L Rien 

‚fuer WMG-Pas 

DC.Lfilename 

DC.Lendezeiger 


800000:00804210 
800000:008040F8 
800000: 

800000: 

800000: 
800100:60000236 
800104:600000CE 
800108:60000780 
80010C:6000060C 
800110:600002B0 
8001 14:600001B0 
800118:600001B4 
80011C:600001B6 
800120:600001A8 
800124:60000236 
800128:60000224 
80012C:6000032C 
800130:60000320 
800134:60000EC0 
800134: 
800138:600002F4 
80013C:600002FC 
800140:600002E8 
800144:600002FA 
800148:60000DA6 
800148: 
80014C:600002D4 
800150:600011DE 
800150: 
800154:60000E08 
800154: 
800158:60000D88 
80015C:60000E3A 
800160:60000E 14 
800164:60000DE8 
800168:60000DEC 
80016C:60000DD2 
800170:60000E48 
800174:60000E54 
800178:600010C04 
80017C:600010AA 
800180:60001044 
800184:60001090 
800188:6000105E 
80018C:60001094 
800190:60001032 
800194:60001090 
800198:6000104C 
80019C:60001086 
8001A0:60000F4E 
8001A4:60000FF2 
B001A4: 


DC.L warmedi 
DC.L pasfehler 


;Start der Sprungeve ktoren ab $800100 


BRA.L SetResetAdr 
BRA.L PREINIT 
BRA.L MONinit 
BRA.LQUIT 
BRA.LKEYPRE SS 
BRA.LBYTEIN 
BRA.LTASTIN 
BRA.L GETSTRING 
BRA.L BYTEOUT 
BRA.L ASCIOUT 
BRA.LWORDO UT 
BRA.LPRTBYT 
BRA.L PRTWORD 
BRA.LSTROUT 


BRA.LCROUT 
BRA.LCLBILD 
BRA.LPRTCOL 
BRA.L PRTMSP 
BRA.LGOTOX Y 


BRA.LBELL 
BRA.LDISZEIL E 


BRA.LRESETF 


BRA.L REWRITE 
BRA.LBLOCKR 
BRA.L BLOCKW 
BRA.LCLOSE 
BRA.L Closedel 
BRA.L IORESULT 
BRA.L UNITOUT 
BRA.L UNITINIT 
BRA.L DAOut 
BRA.L ADIn 
BRA.L PARAINIT 
BRA.L PARASTAT 
BRA.L PARAOUT 
BRA.LPARAIN 
BRA.L PARBINIT 
BRA.L PARBSTAT 
BRA.LPARBO UT 
BRA.L PARBIN 
BRA.L SERAINIT 
BRA.L SERASTAT 


‚ResetAdresse in AO 
;Kaltstart 
;Monitorroutine 


‚Anzahl der anstehenden Byles inDO 
‚Byte in DO 

‚liest Zeichen von Tastatur 
;Al:Zeiger auf Anfang, 1. Byte Laenge 
‚Bytein DO 

‚Ausgabezeichen in DO 

;Wort in DO, DOist veraendert 
‚Bytein DI als Hexbyte ausgeben, DO veraendert 
‚Wort in D1 Hex ausgeben, DOv. 
;At Zeiger auf String, im 1 Byte 

; muss die Laenge stehen 

;Carr. Retum, Linefeed, DOv. 
‚Bildschirm loeschen, DOv. 
"schreiben, DOv. 

;(D1)+1 Leerzeichen, DO-D1 v. 
;D1.W enthaelt in Lowbyte x-K 
‚im Highbyte y-K., DO-D2v. 


‚Adresse in A1,A1 zeiglanschliessend 
‚auf neue Adresse, AD-A4,DO-DA veraenderl 
‚Reset File, A1 Zeiger auf String 
‚wie bei STROUT, Filenr in D1, D0-D2, At v. 
‚wie beiRESETF 
;Filenummer in D1, DO-D2v. 
‚wie bei BLOCKR 


‚schliesst und loescht File 

‚liest IORes der letzien Diskettenoper. in DO 
‚Ausgabebyte in DO 

‚initialisiert Hostcomputer-Drucker 
‚Ausgabewerl in DO 

‚Wert in DO 

‚INITPARALLELA 

‚Bit O von DO=1: Byte kann gesendet werden 
‚ByteinDO 


‚INITPARALLELB 

;Bytein DO 

INIT Seniellport A, D1: Baudrale: $CC,$44 

Bit 0 von DO= 1: Bylekann gesendet werden 

‚Bit 1 von DO=1: Byle empfangen 
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8001A8:60000FAA BRA.LSERAOUT :BYTEINDO 
8001AC:60000FCB BRA.LSERAIN ;BYTEINDO 
8001B0:60000F4E BRA.L SERBINIT : 
8001B4:60001004 BRA.L SERBSTAT 

8001B8:60000FA4 BRA.L SERBOUT 

8001BC:60000FC2 BRALL SERBIN 

8001C0:60001084 BRAL initportb 

8001C4:600010A2 BRA.L readportb 

8001C8:600010F8 BRA.L sendportb 


nolist 


‚mPesasaasenassnannenen DYSYIrrterer 


""KAT-Ce BOOTROM 


* V4#000008 

23.07.86 

Parallel EQU 1 

RAMSTART EQU 000000 

STARTADR EQU $800000 

STACKPTR EQU RAMSTART+SO00AOO 

RAMMAX EQU  RAMSTART+$020000 

zwei6264 EQU RAMSTART+SIFFC 

vier6264 EQU  RAMSTART+$7FFC 

zwei43256 EQU  RAMSTART+SFFFC 

vier43256 EQU  RAMSTART+SIFFFC 

CodeStMax EQU RAMSTART+$18000 

RESETB EQU 12345678 ;EOR MIT RESETADOR 

ı RAM Adressvektoren 

Exceptions EQU RAMSTART ‚niedrigste RAM-Adresse 
DISKB EQU exceptions+$100 

serbBaud EQU DiskB+$200 ‚merkt sich die Baudrate vor Reset 
seraBaud EQU serbBaud+1 

FileFlags EQU seraBaud+1 ‚setzt Bits fuer geoeffnete Files 
ymax equ FileFlags+2 max x-Koord. 

xmax equ ymax+1 ‚max y-Koord. 

StartA7 EQU  xmax+1 
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BUFFER EQU 
REGSAV EQU 
STATSAV EQU 
REGFLAG EQU 
MONFLAGS EQU 
SAVER EQU 
ZNUMMER EQU 
OUTVECT EQU 
YKOORD EQU 
XKOORD EQU 
BILDGR EQU 
OFFSET EQU 
TEXTSTART EQU 
RAMENDE EQU 
CODESTART EQU 
AOSPEICH EQU 
RESETCMP EQU 
RESETADR EQU 


NachMonVar EQU 


StartA7+4 
BUFFER+80 
REGSAV+$40 
STATSAV+2 
REGFLAG+4 
MONFLAGS+2 
SAVER+2 
ZNUMMER+4 
OUTVECT+4 
YKOORD+1 
XKOORD+1 


BILDGR+2 
OFFSET+4 
TEXTSTART+4 
RAMENDE+4 
Codestart+4 
AOSPEICH+4 
RESETCMP+4 


ResetAdr+4 


‚Adressen mit 'RIEN' sind vorlaeufig nicht definiert 
‚und verzweigen zur Begruessungsmeldung der KAT-Ce 


ORG 
; MC 68000 Vector Tabelle 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DO.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 
DC.L 


STARTADR 


STACKPTR 

PREINIT 

Rien ‚Busfehler nicht existent 
ADRERR 

ILLINSTR 

rien ;ZERDIV 
rien ;CHK 
TRAP ;TRAPV 
rien ;Privilegierte Verletzung 
TRACEIt ‚Trace 
ILLINSTR ‚EM1010 
ILLINSTR ;EM1111 
Rien 

Rien 

Rien 

Rien 

Rien 

Rien 

Rien 

Rien 

Rien 

Rien 

Rien 

Rien 


INTERRUPT ‚unechter Interrupt 


‚fuer Eingabe einer Textzeile 
;Speicherplatz fuer 68000 Register 
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DC.L INTERRUPT ‚Level 1 


DC.L INTERRUPT ‚Level2 
DC.L INTERRUPT :Level3 
DC.L INTERRUPT ;Level 4 
DC.L INTERRUPT ;Level5 
DC.L INTERRUPT ;Level6 
DC.L INTERRUPT :Level7 
DC.L TRACEAUS :TRAP #0 
DC.L TRACEEIN ;TRAP #1 
DC.L TRAP ;TRAP #2 
DC.L TRAP :TRAP #3 
DC.L TRAP ;TRAP #4 
DC.L TRAP ;:TRAP #5 
DC.L TRAP ;:TRAP #6 
DC.L TRAP :TRAP #7 
DC.L TRAP ;TRAP #8 
DC.L TRAP ;TRAP #9 
DC.L TRAP ;:TRAP #10 
DC.L TRAP ;TRAP #11 
DC.L TRAP ;TRAP #12 
DC.L TRAP ;TRAP #13 
DC.L TRAP ;TRAP #14 
DC.L TRAP :TRAP #15 


DC.L Rien 
DC.L Rien 
DC.L Rien 
DC.L Rien 
DC.L Rien 
DC.L Rien 
DC.L Rien 
DC.L Rien 
DC.L Rien 
DOC.L Rien 
DC.L Rien 
DC.L Rien 


‚fuer WMG-Pas 

DC.L filename 

DC.L endezeiger 

DC.L  warmedi 

DC.L  turbofehler 

‚Start der Sprungevektoren ab #800100 


bral SetResetAdr ;ResetAdresse in AO 


BRA.L PREINIT ;Kaltstart 
BRA.L MONinit ;Monitorroutine 


BRAL QUIT 


KEYPRESS 
BYTEIN 
TASTIN 
GETSTRING 
BYTEOUT 
ASCIOUT 
WORDOUT 
PRTBYT 
PRTWORD 
STROUT 


CROUT 
CLBILD 
PRTCOL 
PRTMSP 
GOTOXY 


BELL 
DISZEILE 


RESETF 


REWRITE 
BLOCKR 
BLOCKW 
CLOSE 
Closedel 
IORESULT 
UNITOUT 
UNITINIT 
DAOut 
ADIn 
PARAINIT 
PARASTAT 
PARAOUT 
PARAIN 
PARBINIT 
PARBSTAT 
PARBOUT 
PARBIN 
SERAINIT 
SERASTAT 


SERAOUT 
SERAIN 
SERBINIT 
SERBSTAT 
SERBOUT 
SERBIN 


initportb 
readportb 


‚Anzahl der anstehenden Bytes in DO 
‚Bytein DO 

‚liest Zeichen von Tastatur 

;A1:Zeiger auf Anfang, 1. Byte Laenge 
‚ByteinDO 

‚Ausgabezeichen in DO 

;Wort in DO, DO ist veraendert 

;Bytein D1 als Hexbyle ausgeben, DO veraendert 
;Wort in D1 Hex ausgeben, DOv. 

;A1 Zeiger auf String, im 1 Byte 
‚muss die Laenge stehen 

;Carr. Retum, Linefeed, DOv. 
‚Bildschirm loeschen, DOv. 
;"schreiben, DOv. 

;(D1)+1 Leerzeichen, DO-D1v. 
;D1.Wenthaeltin Lowbytex-K 

‚im Highbyte y-K., DO-D2v. 


‚Adresse in A1, A1 zeigt anschliessend 
;auf neue Adresse, AD-A4,DO-D4 veraendert 
‚Reset File, Al Zeiger auf String 

;wie bei STROUT, Filenr in D1, DO-D2, A1v. 
‚wie beiRESETF 

;Filenummer in D1, DO-D2v. 

‚wie bei BLOCKR 


‚schliesst und loescht File 

‚liest IORes der letzten Diskettenoper. in DO 
‚Ausgabebyte in DO 

;initialisiert Hostcomputer-Drucker 
‚Ausgabewert inDO 

‚Wert inDO 

;INITPARALLELA 

;BitO von D0=1: Byte kann gesendet werden 
;Bytein DO 


;INITPARALLELB 
‚ByteinDO 


;INIT Seriellport A, D1: Baudrate: $CC,$44 
‚Bit 0 von DO=1: Byte kann gesendet werden 
;Bit 1 von DO=1: Byte empfangen 
;BYTEINDO 

;BYTEINDO 
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bral sendportb 


nolist 
TRAP RTE ‚nicht definiert 
INTERRUPT ori #$7000,SR ‚Interrupt verhindern 
RTE 


; RAM Vector Tabelle initalisieren 


PREINIT MOVEM.L DO-A7,REGSAV 
if startadr-$800000 
brakaltst 
endif 
MOVE.LRESETCMP,DO ‚PROBE AUF WARMSTART 
EORI.L#RESETB,DO 
CMP.LRESETADR,DO 
BNE KALTST 
MOVE.LDO,-({A7) ;‚ResetAdresse auf Stack 
if parallel 
bsr.linitportb 
else 
move.B serbBaud,d1 
bsr.| serbinit 
endif 
ARTS ‚ResetRoutine starten 
KALTST ORI #$2700,S5R ;SUPERVISOR SETZEN, INTERRUPT=7 
move.w #$BB44,SerBBaud ‚Voreinstellung SerA: 300 Baud 
: SerB: 9600 Baud 
MOVE.L #RETURN,OUTVECT ;RTS-BEFEHL 
CLRFileFlags ‚alle Files geschlossen 
MOVE.W #$0F05,BILDGR ;BOZEICHEN 
move.w #$1727,ymax ıxmax,ymax vorsorglich setzen 
‚40/24 
moveqg #$40,D1; $800000..$8000FF nach $0.. kopieren 
lea StartAdr,AO 
lea RamStart,Ai 
KopVektoren move.l (AO)+,(A1)+ 
subq #1,d1 


bne _KopVektoren 
move.l #STACKPTR,Textstart 


;Ram-Anfang suchen 


move.l #CodeStMax,codestart;hoechstmoeglicher Wert 
move.i #vier43256,A0 ;hoechste Long-RamAdresse 
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nur2Rams 


Foundzwei43256 


dOzurueck 
RamEndsetzen 


no2R6264 


no4R6264 


RSfertig 


move.l 
move.l 
EOR.L 
move.l 
emp. 
bne 
move.l 
cmp.l 
beq 
move.l 
bra 
move. 
move.l 
eor.l 
move. 
cmp.l 
beq 
move.l 
bra 
eor.l 
move.l 
move.l 
bra 
eor.l 
move.l 
addaq.l 
move.l 
cmpa.! 
bne 
move.l 
cmpa.l 
bne 
move.l 
cmpa.l 
bne 


(a0),dO 
#ResetB,D1 
D1,DO 

d0,(a0) 

(a0),dO 
nur2Rams 
#vier6264,AO 
(a0),DO 
dOzurueck 
+#vier43256,AO 
dOzurueck 
#zwei43256,AO 
(a0),dO 

d1,dO 

dO,(a0) 

(a0),dO 
Foundzwei43256 
#zwei6264,AO 
RarnEndsetzen 
d1,dO 

dO,(a0) 
#zwei43256,AO0 
RamEndsetzen 
d1,d0 

d0,(a0) 

#4,A0O 
a0,RamEnde 
:#zwei6264+4,A0 
no2R6264 


‚Inhalt der Speicherstelleretten 
;‚EOR-Wert 

;Alten Inhalt veraendern 

‚und neu speichern 

‚liess sich dieser Wert setzen? 
‚nur2RAM's eingesetzt 
;Probe, ob 4 RAMs 6264 
;steht dort derselbe Wert? 

‚ja, Sprung, 4 RAM'’s 6264 
‚sonst 4 RAMs 43256 

‚Sprung 

‚Probe, ob 6264 RAMs 

;hier kommt nur bei 43256 Wert 
‚wiederum aendern 

‚setzen 

identisch? 

‚ja, 2 RAMs 43256 

‚Ende fuer 26264 RAMs 
‚Sprung 

‚alterı Wert wiederherstellen 
‚und speichem 

‚wenn 243256 exist. 
‚RAMEnde setzen 

‚alten Wert wiederherstellen 
‚und speichern 


‚gefundene Adresse speichern 
nur 2 RAMs 6264? 
‚nein 


& zwei6264-$00OFFC,codestart;setzen 


4#vier6264+4,A0 
no4R6264 


‚4 RAMs 6264? 
‚nein, dann gilt urspruengl. Wert 


#vier6264-S1FFC,codestart;bei2 RAMs 6264 


#zweid3256+4,A0 


RSfertig 


‚nur 2 43256 


move.| #zwei43256-$3FFC,codeslart 


if startadr-$800000 
move.l :#vier6264-$7FC,codestart 


move.| #endecode,textstart 


endif 


„ ASCII Konstanten und besondere Konstanten 


;68000 Codefuer JMP.L 
;Loesche bis Zeilenende 
‚Backspace 

;CARRIAGE RETURN 

;DC1 STEUERKOMMANDO 
;DC2 Steuerkommando 
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Bytein 
Byteout 


suchebdneu 
suchebaud 


baudsuchpause 


Byteout 


Bytein 


tastin 


GetString 


Getstrw 


GetScontrol 


GetSfehler 
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EQU $11 ;Zeileneingabe abbrechen 

EQU $15 ‚;CURSOR 

EQU $20 ‚Leerzeichen 

IF Parallel 

bsr.L  InitPortB 

bSR  BYTEIN 

BRA.L Init ;Ueberspringe Ein/Ausgabe-Dejfinition 


BRA.L ReadPortB 
BRA.L SendPortB 


ELSE 

MOVE.B#SDD,D1 ‚Start mit 38400 Bd 
move.BD1,serbBaud ;Baudrate fuer RESET Warmstart merken 
bsr.L- SerBlnit 

bsr.L serbin ‚Byte lesen 

CMPI.B#$D,DO ‚istesCR? 

BEQ init ‚gefunden 

move #50002,d2 ‚Pause erzeugen 

dbf d2,baudsuchpause 

subi.b #$11,D1 ‚naechste Baudrate einstellen 
CMPI.B=$S33,D1 ‚unter 300 Bdgeht esnicht 
BNE suchebaud ;weitersuchen 

BEQ suchebdneu ‚neu suchen 


BRA.L SerBout 


BRAL SerBin 

ENDIF 

moveq #=$13,DO ‚Anforderung: Taste 
bsr byteout 

bra bytein ‚Taste lesen 


movem.|a0/a1/d0,-(a7) 
move.lal,a0 
ceIr.b (a0)+ 
bsriastin 
cmpi.b #$20,d0 
bes GetScontrol 
move.b d0,(a0)+ 
adda.b #1,(a1) 
bsr AsciOut 

bra Getstrw 
cmpi.b #$d,dO 
beg GetScr 
cmpi.b #$8,dO 
beq GetSlinks 
moveq #$7,d0 
bsr AsciOut 


GetSlinks 


GetScr 


INIT 
SetResetAdr 


NoResetAdr 


‚Sendet DO.W an Host 


WORDOUT 


bra Getstrw 
tst.b (a1) 

beq GetSfehler 
subq.b #1,(a1) 
subq.! #1,a0 
bsr AsciQut 
moveq #$20,d0 
bsr AsciOut 
moveg #$8,d0 
bsr AsciOut 

bra Getstrw 
move.b d0,(a0) 
bsr AsciOut 
moveq #$a,dO 
bsr AsciOut 
movem.| (a7)+,a0/a1/dO 
rts 


MOVE.L #MONINIT,DO 
move.l DO,ResetAdr 
eori.l #ResetB,DO 
move.l DO,ResetCmp 
braL MONINIT 
Move.| AQ,ResetAdr 
beq NoResetAdr 


EXG.L A0,DO 

Eoril +#ResetB,DO 

EXG.L DO,AO 

Move.l AO,ResetCmp 

ATS 

MOVE.W DO,-(A7) ;DO auf dem Stack sichern 
LSR.W #8,DO ‚oberes Byte in unteres schieben 
BSRBYTEOUT ;High-Byte ausgeben 

MOVE.W (A7)+,DO ‚DO vom Stack holen 
BRABYTEOUT ;Low-Byte ausgeben 


;SENDET D0.BAN HOST 


ASCIOUT 


MOVEM.L D1/AO,-(A7) 


CMP.B #$20,DO ;Controllzeichen? 
BCC ASNORM ‚Buchstaben ausgeben 
CMP.B #$8,DO ;BACKSPACE? 
BEQASBACK 

CMP.B #$D,DO ‚CR? 

BEQASCAR 

CMP.B #$A,DO :LINEFEED? 


BEQASLF 


ASCR 


ASNORM 


ASBACK 


ASLF 


ASAUS 
APrOut 


RETURN 


KEYPRESS 


CMP.B #$C,DO 

BNE ASAUS 
CLR.BYKOORD 
CLR.BXKOORD 
BRAASAUS 

ADDQ.B #1,XKOORD 
move.b xkoord,d1 
cmp.b xmax,d1 

bgt APrOut 

braasaus 


TST.BXKOORD 
BEQASAUS 

SUBQ.B #1,XKOORD 
BRAASAUS 

move.b ymax,d1 
CMP.BYKOORD,D1 
BEQASAUS 

ADDQ.B #1, YKOORD 
BSR ByteOut 

MOVE.L OUTVECT,AO 
JSR (AO) 
MOVEM.L(A7)+,D1/AO 
RTS 


MOVEOQ #S12,DO 
BSRBYTEOUT 
BRABYTEIN 


; Tabelle der Monilor-Kommandos 


CMDLST 


CMDEND 


DC.B'M',': ;MOVE 
DC.B'G','O’ 
DC.B'O',R’ 

DC.B 'T’,'V' 
DC.B'X',SD 
DC.B'?',’Z’ 
DC.B'P' 
DC.B’L’,’S' 


sync 


; Kommando Sprungtabelle 
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DC MOVE 
DC SETMEM 
DC Go 


DC BEGRUESSUNG 


DC REGDSP 
DC TRACE 


‚BILDLOESCHEN? 


:Cursorposition in oberste Zeile 
;Cursorposition auf Zeilenanfang 


;ERHOEHEN 


‚rechter Rand erreicht? 
‚eventuell Druckerausgabe 
;Bildschirmausgabe 


‚Cursor am Zeilenanfang? 
‚weiter links wird’s gefaehrlich 
;Cursor einen nachlinks 


‚unteres Bildschirmende erreicht? 

„Ja 

‚Zeiletiefer 

Zeichen auf dem Bildschirm ausgeben 
‚evenl. Druckerausgabe? 

‚event. Zeichen drucken 

;D1,A0O zurueckholen 


;Kommando fuer Keypress an Host 


‚Anzahl der vorhandenen Zeichen 


;STORE BYTES 

;GO ;OUTPUTCONTROL 
;‚QUIT ;REGISTER SET/DUMP 
;TRACE ;VERIFY 

;EXAMINE ;EXAMINE 1 
;RECHNEN ;DISASSEMBLER 
;AUSGABEGERAETE 

;LOAD ‚Save 


DC VERIFY 
DC XAMINE 


DC XAMINE1 
DC RECHNEN 


DC DISASS 


DC AUSGABE 


DC LESEN 


DC SCHREIBE 


SARDAT DC.B 'T’,15,0,1 
DC.B 'S’,13,0,1 
DC.B 
DC.B ’X',4,0,1 
DC.B ’N',3,0,1 
DC.B 'Z',2,0,1 
DC.B ’V',1,0,1 
DC.B 'C',0,0,1 
sync 


;Trace-Modus 
;Supervisor-Modus 
;Interrupt-Ebene 
‚Extend-Flag 
;Negativ-Flag 
;Zero-Flag 
;Overflow-Flag 
‚Carry-Flag 


; Fehler durch Piep anzeigen und Ruecksprung zum Monitor 


SUBERR ADDQ.L #4,A7 
ERROR BRA BELL 


cleoline MOVEQ #ESCE,DO 


BRAASCIOUTI 
BELL MOVEQ #57,DO 
BRAASCIOUTI 
PRTSPC MOVEQ #SPC,DO 
BRAASCIOUTI 
PRTCOL MOVEOQ #':',DO 
BRAASCIOUTI 
CROUT MOVEQ #CR,DO 


BSRASCIOUTI 
MOVEQ #$A,DO 


BRAASCIOUTI 
crout2 bsr crout 

bracrout 
CLBILD MOVEO #12,DO 


ASCIOUTI BRAASCIOUT 


‚erzeuge (D1)+1 Leerzeichen 


PRTMSP MOVEQ #SPC,DO 


PRTMSP1 BSRASCIOUTI 


DBF D1,PRTMSP 


RTS 


‚Adresse der fehlerhaften Prozedur loeschen 
‚und piep sagen 


;bis Zeilenende loeschen 
‚einen Piep ertoenen lassen 
;Leerzeichen ausgeben 
„ausgeben 
:Wagenruecklauf (?) und 
;Zeilenvorschub ausgeben 
;Zwei Zeilenvorschuebe 


‚Bildschirm loeschen 


;Leerzeichen 
‚ausgeben 
;bis D1 leergedbift ist 
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;D2 LONG in hexadezimal ausgeben 


PRTLONG MOVE.LD2,D1 
SWAP DI 
BSR PRTWORD 


MOVE D2,D1 


ı Wort in Di hexadezimal ausgeben 
MOVE.W D1,-(A7) 
LSR #8,D1 
BSRPRTBYT 
MOVE.W (A7)+,D1 


PRTWORD 


MOVE D1,D0 
LSR #4,DO 

BSR PRTDIG 
MOVE D1,DO 


PRTDIG AND =$F,DO 
ADDI #$30,DO 
CMP.B #$3A,D0 
BCSPRTDIG! 
ADDQ #57,DO 


PRTDIG1 BRAASCIOUTI 


‚ Adresse in AO hexadezimal ausgeben (6-stellig) 


PRTADR MOVE.L A0,D1 
SWAP DI 
BSRPRTBYT 
SWAP DI 


BRAPRTWORD 


‚Inhalt von D1 als 2 ASCIi-Zeichen ausgeben 
PRT2ASC MOVE D1,-(A7) 
LSR #8,D1 
BSR PRTASC 
MOVE (A7)+,D1 


PRTASC MOVE D1,DO 
ANDI #$7F,DO 
CMP.B #$7F,DO 


BEQMAKEP 
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;Kopie in D1 anlegen 

oberes Wort in unteres kopieren 
;High-Wort ausgeben 

;Low-Wort wiederholen und ausgeben 


;Wort auf den Stack sichern 
;High-Byle ins Low-Byte schieben 
‚und ausgeben 

‚Wort vom Stack holen und Low-Byte 


;Kopie nach DO 

;High-Nibble ins Low-Nibble schieben 
‚und als ASCII Zeichen drucken 

‚Byte wieder nach DO kopieren, und 


‚oberes Nibble loeschen 

‚Offset fuer Zeichen '0’ addieren 

‚Talls Zeichen < 'A' 

‚sofort ausgeben, 

‚sonst Offset fuer Zeichen 'A' addieren 
und ausgeben 


;Kopie nach DI 

‚High-Wort ins Low-Wort kopieren 

‚aber davon nur das Low-Byte ausgeben 
:zaubere wieder das alte Wort herbei 
‚und gib es aus. 


;Zeichen auf dem Slack sichern 
;High-Byte ins Low-Byte kopieren 
‚undausgeben | 

‚Zeichen wieder vom Stack holen und 


;Kopie nach DO 
:MSBlloeschen 
;Del nicht ausgeben 


CMP.B #SPC,DO 
BCC ASCIOUT2 
MOVEOQ :#'.',DO 
BRAASCIOUT 


MAKEP 
ASCIOUT2 
‚DUMP REGISTER SELECTED BY MASK IN D1 
PRTREG TST.BD1 
BEOPRTREGI 

MOVEOQ #'D’,DO 
BSRASCIOUT2 

MOVEA.L #+REGSAV,A4 
BRAPRTREG2 

MOVEQ #'A’,DO 
BSRASCIOUT2 

LSR #8,D1 

MOVEA.L #REGSAV+32,A4 
MOVEQ #'0',DO 

LSR #1,D1 

BCS PRTREG4 

ADDQ.L #4,A4 

ADDQ #1,DO 
BRAPATREG3 
BSRASCIOUT2 
BSRPRTCOL 
MOVE.L(A4),D2 

BSR PRTLONG 

MOVEQ #1,D1 
BRAPRTMSP 


PATREGI 


PRTREG2 
PRTREG3 


PATREG4 


ı Drucke das Status-Register 

MOVEA.L #SRDAT,AO 
MOVE.WSTATSAV,D3 
MOVEQ #7,D2 
MOVE.B (A0)+,DO 
BSRASCIOUT 
MOVE.B (AO)+,D1 
MOVE.W D3,DO 
LSR.W D1,DO 

AND.W (AO)+,DO 

BSR PRTDIG 

BSR PRTSPC 

DBF 


PRTSRI 


‚naechstes Flag 
RTS 
; Status Register nach Benutzerangabe setzen 


SETSR MOVEA.L #4SRDAT,AO 
MOVEQ #7,D2 
SETSRI1 CMP.B (AO)+,DO 


handelt es sich um druckbares Zeichen? 
‚dann ausgeben 
ı sonst einen Punkt als Ersatz drucken 


;DATA REG SELECTED? 
;NO% 


‚PRINT "D" 
;POINTER TO DREG STORAGE 


‚PRINT "A" 

:SWAP FLAGSTO 80..B7 
;POINTER TO AREG STORAGE 
‚REG NUMBER TO PRINT 
;SHIFT (REGNUMBER) TIMES 


;NOT READY, INCREMENT POINTER 
; AND REGNUMBER 


‚PRINT REGNUMBER 


;REGCONTENTS 
;1+1 SPACES 


‚Adresse der Register-Tabelle 
;gespeichertes SR zurueckholen 
8 Flags ausgeben 

;Name des Flags 

‚drucken 

‚Bit-Position des Flags 

;SR nach DO kopieren 

;bis zum gesuchten Bitnachrechts sc 
‚obere Bitsloeschen 

‚Inhalt drucken 

‚Leerzeichen 

D2,PRTSR1 


‚Adresse der Register-Tabelle 
‚es gibt 7+1 Flags 
‚ist es dieserFlag-Name? 
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BEO SETSR2 dann bearbeiten 


ADDQ.L =#3,A0 ‚sonst Position usw. vebergehen 
DBF D2,SETSR1 ;bis zum Ende der Tabelle 
ORI #1,CCR ‚Carry als Fehlerflag setzen 
ARTS 
SETSR2 BSR.L GETNOSP ‚Wert des Flags 
CMP.B #'",DO ‚istesein':’? 
BNE SETSR3 ‚nein, dann isteine Zahl 
BSR.L GETNOSP ‚sonst ':' ignorieren 
SETSR3 SUBI.B #'’0',DO ‚ASCIt$ Digit umwandeln 
MOVE.B (A0)+,D1 ;Bit-Position des Flags 
MOVE.W (A0)+,D2 und Maximalwert laden 
CMP.B D0,D2 ‚Wert im zulaessigen Bereich? 
BCS SETSRA4 ‚nein, dann abbrechen 
LSL.W D1,D0 ;Wert inrichtige Position schieben 
LSL.W D1,D2 ;Max.-Wert ebenso 
NOT.W D2 ‚invertieren und 
AND.W D2,STATSAV ‚entsprechende Bits des SR loeschen 
OR.W DO,STATSAV ‚eingegebene Bits setzen 
ANDI #SFE,CCR Carry loeschen: ok 


SETSR4 RTS 


GETUNEP BSR CROUT ‚Zeilenvorschub 

BSR PRTCOL ;Prompt ’:' ausgeben 
GETLINE MOVE.L #BUFFER,A6 ‚Zeilenpuffer-Adresse 
getlinex MOVEAL A6,A5 ‚Zeilenende 
GETLINE1 BSR.L TASTIN ‚Zeichen lesen 

CMP.B #SPC,DO ‚Sonderzeichen? 

BCS CONTROL ‚dann Sonderbehandlung 

CMPA.L =#BUFFER+78,A5 ;ist der Puffer voll? 

BCC.L GETLINE3 ‚dann geht nichts mehr 

MOVE.B DO,(A6)+ ‚sonst speichern 

BSR ASCIOUT ‚und ausgeben 

CMPA.L AS5,A6 ‚Hinter Zeilenende-Zeiger? 

BLS GETLINE1 ;nein, dann weiter 

ADDQAL  #1,A5 ‚sonst Ende-Zeiger erhoehen 

BRA GETLINE1 ‚und naechstes Zeichen lesen 
CONTROL CMP.B #CR,DO ;Return? 

BEO LINEEND 

CMP.B #BKSPC,DO ;Linkspfeil? 

BEQ BACKSPC 

CMP.B #RAROW,DO ‚Rechtspfeil? 

BEQ RIGHT 

CMP.B #TRUNC,DO ;Zeilenabbruch? 

BEO LINEBRK 

BRA GETLINE3 ‚mehr Steuerzeichen gibts nicht! 
BACKSPC CMPA.L #BUFFER,A6 ‚Cursor am Zeilenanfang? 

BEQ GETLINE3 ‚da ist eine Wand! 

SUBQ.L #1,A6 ‚sonst Cursor einen nachlinks 

BSR ASCIOUT ‚und Linkspfeil ausgeben 


68 


BRA GETLINE1 


RIGHT CMPA.L AS,A6 
BCC GETLINE3 
MOVE.B (A6)+,D1 
BSR PRTASC 
BRA GETLINE1 

GETLINE3 BSR BELL: 
BRA GETLINE1 

LINEBRK MOVEA.L A6,AS 

UNEEND MOVE.B DO,(A6)+ 
BSR CROUT 
MOVEA.L :#BUFFER,A6 
ATS 


‚weiter 

:Cursor rechts vom Zeilenende? 
‚da gibts nichts zukopieren 
‚sonst alten Text ausgeben 


‚weiter 

Piep das war nix! 

‚noch einmal bitte 

;Zeilenende = akt. Cursorposition 
;CR speichern 

‚Zeilenvorschub 

:A6 = Zeilenanfang 


ı Hole das naechste Zeichen aus dem Zeilenpuffer, Leerzeichen ignorieren 


GETNOSP MOVE.B (A6)+,DO 
CMP.B #SPC,DO 
BEQ GETNOSP 

GROSSKL CMPI.B #$60,DO 
BLE GKRET 
SUBI.B #$20,DO 


GKRET RTS 


; Hole ein ASClI oder HEX Zeichen aus dem Puffer 


GETWORD BTST #4,D6 
BNE GETWORDS 
MOVE.B (A6)+,DO 
CMP.B #CR,DO 
BEQ GETWORDS 
BTST +4#+2,D6 
BNE GETWORD2 
CMP.B :+#SPC,DO 
BEQ GETWORD 
CMP.B #""",DO 
BNE GETWORDI 
BSET 42,D6 
BRA GETWORD 
GETWORD! BSR HEXTST 
BCC SUBERR 
CLA.L D2 
GETWORDW LSL #4,D2 
EOR D1,D2 
MOVE.B  (A6)+,DO 
BSR HEXTST 
BCS GETWORDW 
BCC GETWORD3 
GETWORD2 MOVE D0,D2 
CMP.B  #"",DO 
BNE GETWORD3 


BCLR #2,D6 


;Hole Zeichen aus dem Puffer 

‚istes ein Leerzeichen? 

‚dann das naechste her! 

‚istesetwa ein Kleinbuchstabe? 

‚nein, dann ok 

‚sonst in Grossbuchstaben umwandeln 


;‚FOUNDCRALREADY? 
YESp 
:GET CHAR FROM BUFFER 


;CR,DONE» 

;ASCIIMODE SELECTED? 
;YES»# 

;HEX MODE: IGNORE SPACES 


:START OF ASCII MODE? 
;NO% 

; YES, SET ASCII FLAG 
‚AND GET FIRST CHAR 
:HEX DIGIT IN DO? 
;NO,ERROR% 


;ASCI: PASSCHAR TOD2 
;ENDOF ASCII STRING? 
;NO, DONE 

; YES, SETHEX MODE 
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BRA GETWORD 


GETWORD3 BSET #3,D6 ‚FLAG: NOTEOL 
CMP.B #CR,DO ;FOUND CR AFTER LAST HEX DIGIT? 
BNE GETWORD4 ;NO% 
BSET #4,D6 ‚YES, FLAGIT 
GETWORD4 RTS 
GETWORDS BCLR #3,D6 ;NO VALID DATA INDO 
ATS 


; TEST DO0.B FOR HEX DIGIT, CALC DIGIT INTO D1.B 
GNSHEXT BSR GETNOSP 
iHexTst prueft, ob ein Buchstabe ein Hex-Wert ist 


HEXTST BSR GROSSKL ‚evtl. Kleinbuchst. konvertieren 


MOVEQ #’0',D1 ‚Test, ob Ziffer 
EOR D0,D1 
CMP #10,D1 
BCS HEXTSTI ;DOIN0..I9H OK 
SUB =$71,D1 ‚A..F Test 
CMP #806,D1 
BCC HEXTSTI ‚DO nichtinA..Fp 
ADDI.B #10,D1 konvertieren zum alten Wert 
ORI #1,5R ;Set Carry fuer Hextest-Fehler 
HEXTSTI RTS 
: SET UP REG MASK 
GETREG MOVEQ #1,D2 ;SETUP REG MASK FOR DO 
CMP.B +#'D',DO ;DATAREG? 
BEQ GETREG2 :YESp 
CMP.B #'A',DO ‘NO, ADR REG? 
BEQ GETREGI YESY 
CMP.B #'S',DO ;STATUS REG? 
BNE GETREG3 ;NO, ERROR % 
BSR GETNOSP 
CMP.B #'R',DO 
BNE GETREG3 !INEXT CHAR MUST BE ’'R' 
MOVE.L #$10000,D2 ‚FLAG BITFORSR 
ANDI #$FE,CCR ‚CLEAR CARRY 
RTS ‚DONE 
GETREGI1 MOVE #100,D2 ;REG MASK FOR AO 
GETREG2 BSR GETNOSP ;GET REG NUMBER 
EORI.B #'0',DO ;CONVERT TO HEX 
CMP.B #8,DO ;NUMBER >77? 
BCC GETREG3 :YESp 
LSL D0,D2 ;NO, SHIFT MASK 
ATS 
GETREG3 orl #1,5R ;ERROR: SETCARRY 
RTS 
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ıSET UP REGFLAG FOR LIST OF REGISTERS 


REGLIST MOVEQ #0,D3 


:CLEAR RESULT 
MOVEO #1,D2 DEFAULT START: -DO 
REGLIST1 CMP.B #CR,DO ;ENDOFLINE? 
BEQ REGLISTS :YES# 
CMPI.B #$2D,DO ,'-"-Zeichen? RANGE OF REGS? 
BEQ REGLIST2 :YESp 
BSR GETREG ;GET SINGLE REG MASK 
BCS SUBERR ;ERRORY 
OR.L D2,D3 ;ASSEMBLE FLAG 
BRA REGLIST4 ‚NEXT REG 
REGLIST2 BSR GETNOSP ‚REGISTER RANGE: 
MOVE.W D2,D1 ;SAVE START REG MASK 
BEQ SUBERR ;SR SPECIFIED WITH RANGE :# ERROR 
BSR GETREG ;GETEND REG 
BCS SUBERR ‚ERROR% 
TST.W D2 ;SR SPECIFIED ASENDOF RANGE? 
BEQ SUBERR YES, ILLEGAL! 
REGLIST3 OR.W D1,D3 ;ASSEMBLE FLAG 
CMP D1,D2 ;‚REACHED END REG? 
BEQ REGLIST4 ;YESp 
LSL.W #1,D1 ;NO, NEXT REGMASK 
BCC REGLIST3 ; UNTILA7 REACHED 
REGLIST4 BSR GETNOSP 
CMP.B :#’/',DO ;/' DELIMITER ISOPTIONAL 
BEQ REGLIST4 ‚IGNOREIT 
BRA REGLIST1 
REGLIST5 RTS 
‚D2 Longword aus Eingabezeile lesen 
DI muss den ersten Buchstaben bereits enthalten 
GETLONG MOVEQ #0,D2 ;CLEAR REG 
GETLONGI LSL.L #4,D2 ;SHIFT OLD DIGITS 
EOR D1,D2 ‚ADD NEW DIGIT 
BSR GNSHEXT ;GET NEXT CHAR 
BCS GETLONGI ;OK, CONTINUE 
GETLONG2 RTS ‚END OF HEX NUMBER 
MELDUNG str 'Diskfehler: ' 
UNGSTR str 'Fehler: ungerade Adresse" 
sync 
Quıt MOVEQ  #11,D2 
BSR.L CODEOUT 
move #50000,d0 
quitpause dbf dO,quitpause 
BRA KaltSt 
screeninfo eir d2 
bsr.l codeout ;screeninfo lesen 
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move #$0702,bildgr 
bsr bytein 
move.b dO,xmax 
cmpi.b #79,d0 
bit kleinbild 
move #$0f05,bildgr 
kleinbild bsr bylein 
move.b dO,ymax 
rts 
CloseOffen move FileFlags,D3 ‚Schliesst alle offenen Files 
move #$F,D4 
closemehr btst d4,03 
BEQ Nichtoffen 
move d4,d1 
bsr.l close 
nichtoffen subq #1,d4 
bpl closemehr 
ns 
BUSSTR str "Busfehler-Zugriff auf: ' 
ERRSTRI str ‘Falscher Zugriff auf’ 
ERRSTR2 str "Unbekannte Anweisung in ' 
anftext ste KAT-Ce Version 1.3" 
ramendtext str 'RAM-Endebei $' 
textanftext str 'Editortext ab$' 
codanftext str ’Assernbler Code ab $' 
wastuntext str 'E(ditor W(arm-Editor M(onitor' 
wasnochtext str "X(ecute Alssembler R{un Qfuil' 
KeinRCText str "»» Kein Code verfuegbar' 
XrFileStr str 'Welches File starten: ' 
SYNC 
ı COLDSTART OF MONITOR 
MONINIT MOVEM.L DO-A7,REGSAV ‚alle Register speichern 
MONIN MOVE.L #0,A1 ;Startwert fuer Hex-Adressen setzen 
MOVE.LL A1,A2 ;‚Startwert fuer Endadresse 
MOVE.L #$SO0001FFFF,REGFLAG ‚zunaechsi alle Register zeigen 
BSR.L CROUT 
CLR.L BUFFER 
CLR.W MONFLAGS 
; WARMSTART OF MONITOR 
MONI MOVE SR,STATSAV Werte fuer SR speichern 
;Begruessung 
begruessung bsr clbild ;Bildloeschen 
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rien 
begruess2 


wastunwarte 


ExecuterFile 


Einstieg fuer nicht definierte Befehle 

BSR CloseOffen 

MOVE.L _#RETURN.OUTVECT;RTS - BEFEHL 
move.| a7,StartA7 


bsr crout2 

lea anftext,a1 ‚Textausgeben 
bsr.l strout 

bsr croui2 

lea Textanftext,a1 
bsr.l strout 

move. Textstart,AO 
bsr prtadr 

bsr crout 

lea codanftext,a1 
bsr.| strout 

move.l codestart,a0 
bsr prladr 

bsr crout 

lea ramendtext,a1 
bsr.| strout 

move.l ramende,a0 
subq.l #1,a0 

bsr prtadr 

bsr crout2 

lea wastuntext,a1 
bsr.| strout 

bsr crout 

lea wasnochtext,al 
bsr.| slrout 

bsr screeninfo 
bsr TASTIN 

bsr grosskl 
cmpi.b ı#'A’,dO 

beq.| AssStart 
cmpi.b #'X',‚dO 

beq.l Executerile 
cmpi.b #'R',dO 

beq.l RunRamCode 
cmpi.b #'E’,dO 

beaq.| kateditor 
cmpi.b #'W',dO 

bea.l warmedi 
cmpi.b ##'M’,dO 

beq.l mon2 

cmpi.b #'Q',dO 

beq quit 

bra wastunwarte 
bsr crout2 

lea XFilestr,al 
bsr.l strout 

move. +buffer a6 ‚Platz fuer Laengenbyte 
move.b #' '(a6)+ ;des Filenamens schaffen 
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RunRamCode 


lasslaufen 


bsr 
move.b 
move.b 
bsr.| 
bra 

bsr 
move.l 
move.l 
addq.l 
cmp.l 
beq 

lea 
bsr.l 
bra 
move.l 
jsr 

bra 


; MONITOR MAIN LOOP 


MON2 


MON44 


MON21 


MON22 


MON23 


MON24 
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CLR 
ANDI 
BSR 
BSR 
BSR 
BCC 
BSR 
BCLR 


getlineX 
#,(a5)+ 
#'G’,‚(a5)+ 
lesen 
begruess2 
crout2 
CodesStart,AD 
A0,DO 

#8,DO 
(a0),dO 
lasslaufen 
KeinACText,a1 
strout 
begruess2 
d0,a0 

(a0) 
begruess2 


D6 
=S7FFF,STATSAV 
GETLINEP 
cleoline 
GNSHEXT 
MON2i 
GETLONG 
#0,D2 
D2,A1 
D2,A2 
#0,D6 
=$2E,DO 
MON22 
GNSHEXT 
MON22 
GETLONG 
*0,D2 
D2,A2 
#1,D6 


;Narne des Files holen 
‚Start des Files ermoeglichen 


‚File einlesen und ausfuehren 


‚CLEAR OPERATING FLAGS 
;NOTRACE 
‚GET CMD FROM USER 


;NO$ 
;YES, GET START ADDRESS 


‚END ADR DEFAULTS TOSTART 
‚FLAG: START ADR GIVEN 
;NEXT CHAR ='."? 

:NO% 


;NO% 
YES, GETENDADDRESS 
;gerade machen 


;FLAG: END ADR GIVEN 


#CMDEND-1-CMDLST,D1 


#CMDEND,AO 
-(A0),DO 
MON24 
D1,MON23 
ERROR 

MON2 

#1,D1 
#JMPLST,AO 
$O(A0,D1),-(A7) 
#STARTADR,DI 
(AT+,D1 
D1,A0 


‚SEARCH FORCMD CHAR 
;FOUND$ 


‚INVALIDCMD CHAR 
‚INDEX TO JMP TABLE 


;GET ADDRESS OF CMD ROUTINE 


JSR 
BRA 


TraceAus 


:TRAP #1 schaltet TRACE ein: 


ori.w 
oORI 
ori.b 


TraceEin 


(A0) 
MON2 


#$7FFF,(a7) 
#$1F,MonfFlags 


#$7FFF StatSav 


#$8000,(a7) 


;EXECUTE CMD 
:GETNEXTCMD 


#$8000,STATSAV ;Trace Mode setzen 


#$E0,monflags 


; EXECUTE TRACE EXCEPTION: DUMP PC AND REGISTERS 


Tracelt 


Tracelt7 


Tracelt2 


Tracelt3 


Tracelt5 


Tracelt6 


TraceltR 


#6,A7 
DO-A7,REGSAV 
#6,A7 
(a7),statsav 
#6,MONFLAGS 
Tracelt4 


ZNUMMER,A1 
DISZEILE 
REGFLAG,D3 
REGDSP1 
CROUT 
#BACK1,2(A7) 


TraceltRET 
#7,MONFLAGS 
Tracelt3 
KEYPRESS 

DO 

Tracelt4 
TASTIN 
#SPC,DO 
Tracelt5 
#7,MONFLAGS 
Tracelt4 
#CR,DO 
Tracelt6 
#7,MONFLAGS 
Tracelt4 
#$03,DO 
Tracelt4 
#5,monflags 


‚Registerwerte speichern 


;‚Statusregister lesen 

‚Startbit gesetzt? 

‚ja, zunaechst den ersten Befehl 
‚ausfuehren 

‚Adresse der zu disass. Zeile 
‚Zeile Disass 

;Registerliste ausgeben 


‚Ist der Ausgangszustand des 
;Stacks erreicht? 

‚ja, Trace-Ende 

;Step Mode? 

‚ja 

;Laufmodus: Taste gedrueckt? 


‚nein 

‚Taste lesen 
;‚Leertaste? 

‚nein 

;StepModus setzen 
‚fertig 

;RET gedrueckt? 
‚nein 

;Laufmodus setzen 
‚fertig 

;CTRL-C gedrueckt? 
‚nein 


;Trace durch TRAP-Befehl eingeschaltet? 


Tracelt4 MOVE.L 
TraceltRET ADDQ.L 


traptrende andi 


! EVALUATE COUNT IF SPECIFIED 
RANGE BSRL 
BCC 
BSR 


SUBQ.L 
BTST 


RANGEI BTST 
RANGE2 RTS 
; MOVE CMD 


MOVE BSA.L 


MOVEI MOVE.B 


iraptrende 
#BACK1,2(A7) 
TraceltRET 
#2,A7 

TraceltR 
2(AT),ZNUMMER 
#6,MONFLAGS 
REGSAV,DO-A6 


#6,A7 
#$7FFF,SR 
#$7FFF Statsav 
BACKI 

#S7FFF (a7) 
#S1F,monflags 
Tracelt4 


GNSHEXT 
RANGE2 
GETLONG 
#1,D2 
#1,D6 
RANGEI 
#1,D2 
A1,D2 
D2,A2 
RANGE2 
#0,D6 
RANGE2 
A2,A1 
D2,A1 


GETLTGER 
D2,A3 
A1,A4 
A2,D3 
(A4)+ (A3)+ 
A4,D3 
MOVEI 


A1,DO 
#0,D0 


Ja 

‚Routine beendet? 

;Trace - Ende 

;Stack wiederherstellen 

‚fertig 

‚naechste Adresse fuer Disass. speichern 
;Startflag loeschen 

;Register wiederherstellen 
‚das wars 

‚Stack korrigieren 

‚Trace loeschen 

‚auch im Speicher 

‚Sprung zum Ende der Routine 
;Trace loeschen 

‚auch im Speicher 


‚lies Zeichen 
‚kein Hex 
‚lies Longword 


‚ex. Endadresse? 
ja® 


‚nein END:=START+COUNT 


‚ex. auch Startadresse? 
‚ja, Zaehler ignorieren 
‚nein START:=END-COUNT 


gerade Adresse lesen 


;‚Quellenzeiger 
‚Ende der Quelle 
kopieren 
‚fertig? 

;neiny 


‚gerade Adresse? 


GO1 
BACKI 


SETMEM 


SETHEX 


ADRGER 


SETMEM1 


TASTE 


TASTRET 
TASTE2 


; VERIFY CMD 


VERIFY 


VERIFY1 


ERROR 
A1-A3/AG,-{A7) 
A1.A6 
D6,MONFLAGS 
REGSAV.DO-A5 
STATSAV,SR 
(A6) 
SA,STATSAV 
DO-A7,REGSAV 
(AT)+,A1-A3/AG 
MONFLAGS,D6 


GETWORD 
#3,D6 
SETMEMI 
#2,D6 
SETHEX 
D2,(A1)+ 
SETMEM 


KEYPRESS 
DO 
TASTRET 
TASTIN 
:#$3,DO 
TASTE2 
TASTIN 
#$3,DO 
TASTE2 


#4,A7 


GETLTGER 
D2,A3 
A1,A4 
A2,D3 
(A4),D1 
(A3),D1 
VERIFY2 
A4,AO 


‚noln, Fahlor 

:Monitor- Magister rattar, 
‚Start Adresse 

SAVE S/TILAG 
:Rogialar ladarı 

SRauch 

Progrmmen starten 
‚SRund 

;Roglstorinhalte spais.horr: 


;Monitor-Ragistor vansiart «Jer. 


‚D6-Flags wisderhorsta!ter, 


;holo Daton 
;gueltigo Datan? 
‚nein 
;HEXMODE? 

ja 

;direkt speichern 


‚gerade Adresse? 


ja 

‚nein, 1 Byte speichern 
speichern 
‚weitermachen 


‚Taste gedrueckt? 


‚nein 

;Taste lesen 
;CONTRC? 

ja 

‚nocheine Tastelesen 
;CONTRC? 

ja 


;’PULL’ 


‚SET UP SOURCE POINTER 


;COMPARE BYTES 


;NOT EQUAL: 
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VERIFY2 


: EXAMINE MEMORY CMD 


KAMINE BSR 
XAMINE1 move.| 
belr 
move.l 
MOVE.L 
MOVE.L 
BSR 
BSR 
XAMINE2 BSR 
MOVE.W 
BSR 
MOVE.L 
CMP.L 
BHI 
AND.B 
BNE 
CLR.L 
MOVE.B 
LSL 
SUB.B 
BSR 
MOVE.W 
BSR 
MOVE.L 
CMP.L 
BHI 
AND.B 
BNE 
BSR 
BSR 
BRA 


AASC 


AASCW 
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PATADR 
PRTCOL 
(A4),D1 
PRTWORD 
#2,D1 
PRTMSP 
A3,AO 
PRTADR 
PRTCOL 
(A3),Di 
PRTWORD 
CROUT 
TASTE 
(A4)+ (A3)+ 
A4,D3 
VERIFY1 


RANGE 
al,di 
#0,d1 
di,a1 
A1,AO 
A1,A4 
PRTADR 
PRTCOL 
PRTSPC 
(A1)+,D1 
PRTWORD 
A1,D2 
A2,D2 
AASC 
BILDGR,D2 
XAMINE2 
D1 
BILDGR,D1 
#2,Di 


XKOORD,D1 


PRTMSP 
(A4)+,D1 
PRT2ASC 
A4,D2 
A2,D2 
CROUT 
BILDGA,D2 


;PRINT SOURCE ADR 


;SOURCE BYTE 
;3SPACES 


;‚DESTADR 


;DESTBYTE 
‚CR 


‚INCREMENT POINTERS 
;‚REACHED ENDOF RANGE? 
;NO% 


‚EVALUATE OPTIONAL COUNT 
‚ungerade Adresse verhindern 


:STARTADDRESS 
;PRINTADRA 

;PRINT BYTE IN HEX 
;ENDOF RANGE? 
;:YES$ 


;ENDOF SCREENLINE? 
;NO$ 


;SET/DISPLAY REGISTERS 


REGDSP 


REGDSP1 


REGDSP2 


REGDSP5 
REGDSP3 


REGDSP4 
REGSET 


REGSETI 


REGSET2 


REGSET3 


REGSET4 


BSR 
CMP.B 
BEQ 
BSR 
TST.L 
BNE 
MOVE.L 
MOVEQ 
MOVEQ 
MOVE.W 
AND.W 
BEQ 


GETNOSP 
#’=',DO 
REGSET 
REGLIST 

D3 
REGDSPI 
REGFLAG,D3 
#1,D4 
#0,D5 
D4,D1 

D3,D1 
REGDSP3 
D5,REGDSPS 
CROUT 

D5 
BILDGR+1,D5 
PRTREG 
#1,D4 
REGDSP2 
#$10,D3 
REGDSP4 
CROUT 
PRTSR 
CROUT 
GETNOSP 
GETREG 
REGSETI 
SETSR 
ERROR 
GETNOSP 
REGSETA4 

D2 

ERROR 
#REGSAV,A4 
D2 
REGSET2 
#8,D2 
+#REGSAV+32,A4 
#1,D2 
REGSET3 
#4,A4 
REGSET2 
GETNOSP 
#'",DO 
ERROR 
GETLTEST 
D2,(A4) 
+7,00 
REGSET 
#CR,DO 


;NEXT CHAR ='='7 

;YES, SET REGISTER CONTENTS 
;NO, GETREGLIST 

‚ANY REG’SSPECIFIED? 


;NO, USE DEFAULT 
START IN FIRSTCOLUMN 


THIS REG SPECIFIED? 
;NO$ 

;:COUNT DOWN COLUMNS 
;:START NEWLINE 


‚RESET COUNTER: ANZAHL SPALTEN 
; YES, PRINTIT 

;SHIFT TO NEXT MASK 

: UNTILA7 REACHED 

‚WHAT ABOUTSR? 

ıNOTSELECTED 


; YES, PRINTSR 


:GETREG MASK 
‚AORDREGSPECIFIEDY 
;STATUS REG FLAGS SPECIFIED? 
;NO% 

;:GET NEXTCHAR 

;NEXT REGISTER 
;SRSPECIFIED? 

‚YES 

:POINTER TO DREG STORAGE 
;‚DREG SPECIFIED? 

ıYES»Y 

;NO, SWAP FLAGS 

;POINTER TO AREG STORAGE 


‚ADJUST POINTER ACC. TO REG NUMBER 


:NEXTCHAR =")? 
:NO% 


‚SETUPIN STORAGE AREA 
;DELIMITER FOLLOWING? 

; YES, PROCEED 

;NO, ENDOF LINE? 
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BNE ERROR ‚NO% 


RTS 
‚REGISTER OUTPUT CONTROL 
OUTPUT BSR GETNOSP 
BSR REGLIST ;GET REGISTERLIST 
MOVE.L D3,REGFLAG STORE 
ATS 
TRACE CMD 
TRACE on.b #$C0,D6 ‚Single Step Modus, Startbit setzen 
ORI #$8000,STATSAV ;imSpeicher Trace-Bit setzen 
BRA Go ‚Starle Programm 
SUCHERR MOVEQ #0,D1 
ADDQ.L #8,A7 
RATE 
ADRERR MOVEAL =ERRSTR1,A1 
BRA ERROUT 
ILLINSTR MOVEAL ERRSTR2,A1 
ERROUT BSR CROUT 
BSR.L STROUT 
MOVE.L 2{AN)AO 
BSR PRTADR 
BSR CROUT 
BSR BELL 
move.l startA7,A7 
jmp begruess2 
:LONG SUCHEN 
GEILTEST BSR GETNOSP 
BSR HEXTST 
BCC SUBERR 
BRA GETLONG 
GETLTGER BSR GETLTEST 
BCLR #0,D2 
ATS 
indiskbuffer movem.! A1VD1 „an ‚schiebt aus (AO) in Diskbuffer 
move #512,d1 
lea diskb,a1 
indbweiter move.b (a0)+,(a1)+ 
subq #1,d1 
bne indbweiter 
mover.| (ATJ+,A1/D1 
ns 
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ausdiskbuffer moveml A1/D1.-{A7) ‚schiebt Diskbuffer nach (AO) 


move #512,d1 
lea diskb,a1 
ausdbweiter move.b (a1)+,(a0)+ 
subq #1,d1 
bne ausdbweiter 
movem.l (AT)+,A1/D1 
ns 
SCHREIBE BSA.L Name 
BSR GETLTGER 
MOVE.L D2,D3 
BSR GETLTGER 
MOVE.L D2,D4 ;LAENGE SPEICHERN 
; SENDEVORGANG 
CLR.L DI 
BSR. REWARITE 
BSR. AlfrediORes 
CLR.L D5 
MOVEA.L D3,A1 
MOVEA.L #DISKB,AO 
MOVE.L DJ,(A0O)+ ANFANG 
MOVE.L D4,(A0)+ ‚LAENGE DES PROGRAMMS 
ADDI.L #8,D4 
MOVEA.L D3,At1 ‚ANFANG 
BFILL MOVE.L  (A1)+,(AO)+ 
CMPA.L  #DISKB+512,AO ;BUFFERVOLL? 
BNE BFILL 
CLAL D1 
BSR. BLOCKW 
BSR. AlfrediORes 
ADD.L #1,D5 
MOVEA.L 4DISKB,AO 
SUBI.L #512,D4 
BGT BFILL 
CLA.L D1 
BSR.L CLOSE 
BRAL AlfrediORes 
LESEN BSA.L NAME 
belr #0,monflags kein Go 
er.t D2 ;zeigi an, ob neue Startadresse 
cmpi.b #$D,DO Zeilenende? 
beq nolesestart ‚ja 
cmpi.b +#',",DO :Komma? 
BNE nolesestart ‚nein 
BSR GNSHEXT ‚folgt ein HexZeichen? 
BCC testgo ‚nein 


BSR GETLONG ‚Siartadresse in D2 einlesen 


testgo 


nolesestart 
neulesestart 


noneustart 
LEEREN 


FERTIG 


RET 


LSTR 


LAUFEN 
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#',,DO 
neulesestart 


#0,monflags 
neulesestart 
#'G',DO 
nolesestart 
#0,monflags 


RESETF 
AlfredIORes 
D5 

D1 

BLOCKR 
AltrediORes 
#DISKB,AO 
(A0)+,A1 
A1,D3 

D7 
noneustart 
D7,D3 
D7,A1 
(A0)+,D4 
(A0)+,(A1)+ 
#4,D4 
FERTIG 
#DISKB+512,AO 
LEEREN 
#1,D5 

D1 

BLOCKR 
AlfrediORes 
#DISKB,AO 
LEEREN 

D1 

CLOSE 
AlfrediORes 
#0,Monflags 
laufen 
#LSTR,A1 
STROUT 
D3,AO 
PRTADR 
"Anfang bei: ' 


D3,A2 


‚folgt Komma? 
‚nein 


;Goanzeigen 

‚zeigt an, ob neue Startadresse 
‚evtl Startadresse speichern 
;Filenummer 


‚Test auf Diskfehler 
‚Blockzaehler 


‚Anfang lesen 
‚speichern 

‚evtlneue Startadresse 
‚nicht gewuenscht 

‚ja, setzen 


;Laenge 


NAME3 


REWRITE 


:GOTOXY D1 ENTHAELT XKOORD I 


GOTOXY 


AlfrediORes 


NOERR 


SetFileFlag 


ClearFileFlag 


JMP 


BSR 


MOVEA.L 


SUBQ.L 
MOVE.B 
CMP.B 
BEQ 
CMP.B 
BNE 
MOVE.L 
SUB.L 
SUBA.L 
MOVE.B 
RTS 


BSR 
MOVEQ 
BSR.L 
BSR 
BRA.L 


MOVEQ 
BSR.L 
MOVE 
MOVE.B 
BSR 
MOVE 
LSR 
MOVE.B 
BRA 


movem.l 
BSR 


(A2) 


GETNOSP 
A6,A1 
#1A1 
(A6)+,DO 
#$D,DO 
NAME3 
#',,DO 
NAME1 
A6,D2 
A1,D2 
#1,D2 
D2,-(A1) 


SetFileFlag 
#6,D2 
CODEOUT 
FNUMMEROUT 
CSTROUT 


‚ersten Buchstaben suchen 
‚Zeiger auf Anfang+1 

‘A1 zeigt auf 1. Buchstaben 
‚Zeichen lesen 

‚Zeile fertig? 

‚ja 

‚Komma? 

;nein, weitermachen 
‚;Laenge berechnen 


‚Laengenbyle setzen 


M LOWBYTE, YKOORD IM HIGHBYTE 


#10,D2 
CODEOUT 
D1,DO 
DO,XKOORD 
BYTEOUT 
D1,DO 
#8,DO 
DO,YKOORD 
BYTEOUT 


dO-d2,-(a7) 
IORESULT 


IOERR 
StartA7,A7 
begruess2 
(a7)+,dO-d2 


FileFlags,D2 
D1,D2 
D2,FileFlags 


FileFlags,D2 
D1,D2 


;Stackpointer-korrektur 


83 


IORESULT 


FNUMMEROUT 


CLOSE 


CLOSEDEL 


RESETF 


CODEOUT 


BLOCKW 


BLOCKWI 


BLOCKR 


BLOCKRI 
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D2,FileFlags 


#9,D2 
CODEOUT 
BYTEIN 


D1,D0 
BYTEOUT 


ClearFileFlag 
#7,D2 
CODEOUT 
FNUMMEROUT 


ClearFileFlag 
#8,D2 
CODEOUT 
FNUMMEROUT 


SetFileFlag 
#5,D2 
CODEOUT 
FNUMMEROUT 
CSTROUT 


#DC1,DO 
BYTEOUT 
D2,D0 

BYTEOUT 


#4,D2 
CODEOUT 
FNUMMEROUT 
D5,D0 
WORDOUT 
#DISKB,AO 
(A0)+,DO 
BYTEOUT 
#DISKB+512,AO 
BLOCKWI 


#3,D2 
CODEOUT 
FNUMMEROUT 
D5,D0 
WORDOUT 
#DISKB,AO 
BYTEIN 
D0,(A0)+ 
#DISKB+512,A0 


UNITOUT 


UNITINIT 


IOERR 


ERR19 


CSTROUT 
STROUT 


w 


stroufrts 


RECHNEN 


DIV 


BNE 
RTS 


MOVEM.L 
MOVEQ 
BSR.S 
movem.l 
BRA 


movem.l 
MOVEQ 
BSR 
MOVEM.L 
RTS 


MOVE.B 
BSR 
MOVEA.L 
BSR 
MOVE.B 
BSR 


BLOCKR1 


D0/D2,-(A7) 
#1,D2 
CODEOUT 
(A7)+,00/D2 
BYTEOUT 


D0/D2,-(A7} 
+2,D2 
CODEOUT 
(AT)+,D0/D2 


D0,D5 
CLOSEdel 
#MELDUNG,A1 
STROUT 

D5,D1 

PRTBYT 

BELL 


(A1),D0 
BYTEOUT 
(A1)+,D1 
stroutrts 
(A1)+,DO 
ASCIOUT 
#1,D1 

w 


GETLTEST 
D2,D3 
-(A6),D4 
(A6)+,D2 
GETLTEST 
#$2B,D4;'+' 
PLUS 
#$2D,D4;'-'? 
MINUS 
#'"',D4 
MAL 

#'/',D4 
BELL 

D2 

BELL 

D2,D3 

D3,D1 
#'=',DO 
BYTEOUT 


;FEHLERNUMMER 


‚A1 ZEIGER AUF STRING 
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MAL 
RAUSG 


NoP3 


NoP4 


INITTAB 


OUTTAB 
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DO 

(A6)+,DO 
#$30,DO 
BELL 
#$35,DO 
BELL 
#$33,d0 
noP3 
seraBaud,D1 
#$34,D0 
noP4 
serbbaud,d1 
#$7,D0 
#2,DO 
#OUTTAB,AO 
SO(AO,DO)OUTVECT 
#INITTAB,AO 
$0(A0,DO),AO 
(AO) 
BRETURN 
PARAINIT 
UNITINIT 
SERAINIT 
SERBINIT 
BRETURN 
PARAOUT 
UNITOUT 
SERAOUT 
SERBOUT 


Routinen fuer Ein- Ausgabekanaele 
iin DO stehen die Ein- bzw Ausgabebyles 
!bei den Status-Routinen steht in DO: 


;Bit O0 gesetzt: sendebereit 
‚Bit 1 gesetzt: Byte angekommen 


PAUSE MOVE.L DO,-{A7) 
MOVEQ #$FF,DO 
PAUSEW SUBQ.B #1,D0 
BNE PAUSEW 
MOVE.L (A7+,DO 
BRetum RTS 
SERAINIT MOVE.L AO,-(AN) 
bsr STimerlnit 
bsr SerlnitWeiter 
MOVE.B #$55,$1D(AO) 
move. (a7)+,AO 
RTS 
SERBINIT MOVE.L AO,-(A7) 
bsr STimerlnit 
adda #$10,AO 
bsr SerlnitWeiter 
MOVE.B #$AA,$D(AO) 
move.l (a7)+,AO 
ATS 
STimerlnit MOVE.L +$402000,A0 


MOVE.B +#$E0,$%A0) 


‚A0retten 


;HANDSHAKEAUSG=BEREIT 


‚ADretten 
;B-Register erreichen 


;HANDSHAKEAUSG=BEREIT 


;Grundadresse des 68681 
‚Timer auf 38400 Bd stellen 
‚Timer arbeitet mit Quarzfrequenz 3,68 Mhz 


MOVE.L :+$00000003,$C(a0) ;beide Timer-Register setzen 


ATS 

SerlnitWeiler MOVE.B D1,$3(A0) 
MOVE.B +#$45,$5(A0) 
MOVE.B #3$25,$5(A0) 
MOVE.B #$35,$5(A0) 
MOVE.B #$15,$5(A0) 
MOVE.B #$13,$1(A0) 


MOVE.B #$17,$1(A0) 


ATS 
SERAOUT move.l a0,-(a7) 
move.l #$402000,30 
bra zweg 
SERBOUT MOVE.L AO,-(A7) 
MOVE.L #$402010,A0 
ZWEG BTST #+2,$3(A0) 
BEQ ZWEG 


‚In D1 Baudraten-Code setzen 
;Reset Error Status 

;Reset Receiver 

‚Reset Transmitter 

;Reset Modere. Pointer 

‚8 Bit, no Parity 

‚jetzt ist MR2A zugaenglich 
:CTS enable Transmitter 

‚1 Stopbit 


‚ADretten 
‚Adresse Port A 


‚A0retien 
‚Adresse Port B 
‚Transmitter ready 
‚nein® 


87 


SERAIN 


SERBIN 


ZDA 


SERASTAT 


SERSTAT 


SEREINTEST 


SERNIXDA 


SERBSTAT 


PARBINIT 
PARAINIT 


PARBOUT 
PARAOUT 


PARAW 


PARASI1 


PARASTAT 


88 


DO,$7(AD) 
(AT)+,AO 


AO,-(A7) 
#$402000,A0 
zda 

AO,-(A7) 
#$402010,A0 
#0,$3(A0) 
ZDA 
$7(A0),DO 
(AT)+,AO 


AO,-(A7) 
$402003,A0 
DO 

=2,(A0) 
SEREINTEST 
#0,DO 
#0,(A0) 
SERNIXDA 
#1,D0 
(AT)+,AO 


AO,-(A7) 
$402003,A0 
SERSTAT 


AO,-(A7) 
#5400000,A0 
#831,$1(A0) 
#$B1,$D(A0) 
#SFF,S5(A0) 
#$D,DO 
PARAS1 


AO,-{A7) 
#$400000,AO 
#0,81B(A0) 
PARAW 
#0,$1B(A0) 
D0,$11{A0) 
#$B9,$D(A0) 
d0,-(a7) 
(a7)+,dO 
#$B1,$D(A0) 
(AT)+,AO 


$40001B,DO 
#1,DO 


Byte ausgeben 
AO wiederherstellen 


‚A0retien 
‚Adresse Port A 


‚A0retten 

‚Adresse Pot B 
‚Byte angekommen? 
;nein$ 

ıBytelesen 

;A0O wiederherstellen 


‚AO retten 

;‚Stalusregister Port A 
‚zunaechst loeschen 
‚Transmitter sendebereit? 
;nein$ 

sonst Bit 0 setzen 

‚Byte angekommen? 
‚nein 

‚sonst Bit 1 selzen 

AO wiederherstellen 


‚AU retten 
;Statusregister Port B 
;bearbeiten 


‚AO retten 

;Grundadresse 68230 

;MODE 0, H1 LOW-HIGH FLANKE 
:SUBMODE 10 

‚ALLES AUSGAENGE 
‚CRSENDEN 


;ADretten 

;Grundadresse 68230 

‚ACKN ANGEKOMMEN? 
‚neiny 

;ACKN-FLAG LOESCHEN 
:BYTE AUF LEITUNG SETZEN 
‚STROBE ERZEUGEN 

‚kurze Pause erzeugen 
‚Strobelaenge = 39 Taktzyklen 
;STROBE LOESCHEN 

‚AO wiederherstellen 


‚Statusregister lesen 
‚Bit O gesetzt: Sendebereit 


PARAIN 
PARBIN 
PARBSTAT 
ADin 


ADwarten 


DAOut 


InitPortB 


ReadPortB 


readBHS 


Aead01 


Read23 


;Bit 1 gesetzt: Empfangsbereit =0 


RTS 

ARTS ‚entfaellt 

ARTS ‚entfaellt 

RTS 

TST.B $C06000 ‚AD-Wandlung starten 
MOVE #10,D0 ‚120 Zyklen warten 
DBF DO,ADwarten 

MOVE.B $C04000,D0 ;Messwert lasen 
ATS 

MOVE.B D0,$C02000 ‚Byte in DO ausgeben 
ARTS 


‚Initport B initialisiert fuer die 8-Bit 
;Parallelschnittstelle zu parallel angeschlossenen 
;Host-Computern 

;Bit0-3: Eingang 

‚Bıt4-7: Ausgang 

‚Handshakeleitungte "unbenutzt 


move.| AO,-(A7) ‚AO retten 
lea $400000,A0 ;Grundadresse 682.J0 
move.b #$35,$1(a0) ;Mode 0, H12,H34 aktivieren, 


iH1 und H3 seagieren auf H-LFiI> 
‚im 2°4Bit Mode werder. .13,H4 


‚nicht benoetigt 
move.b #$80,$F(a0) ;PortB Submode 10 
move.b #$F0,$7(a0) ‚Bit0-3 = Eingang, 4-7 = Ausgang 
eir.b $13(a0) ‚Ausgang loeschen 
move.l (a7)+,AO ‚AO wiederherstellen 


ns 


movem.| A0/D1-D2,-(A7) ‚Register retten 


lea $400013,A0 ‚Adresse von Ausgabeport B 
elr do ‚Einlesebyte zunaechst leer 
moveq #2,d1 ‚zuerst 0-3, dann 4-7 lesen 
move.b #$80,(a0) „‚empfangsbereit 

move.b (a0),D2 {Lies den Eingang 

andi.b #$C,d2 ;warte, bis korrektes Signal 
cmpi.b #$4,d2 ‚nchtig? 

bne readBHS ;nein® 

btst #2,$04(a0) ;High Takt zurueck? 

beq Read01 ‚nein 

move.b $4(a0),d2 ‚sonst Daten lesen 

move.b #$C0,(a0) ;H-Takt ausgeben 

andi.b #$3,D2 ‚2 Bits isolieren 

or.b d2,d0 ‚einbauen 

ror.b #2,d0 

btst #2,$04(a0) ;Low-Takt? 

bne Read23 ‚nein 

move.b $04(a0),d2 ;Dalen lesen 

andi.b #$3,d2 ‚2 Bits isolieren 

or d2,d0 ‚einbauen 


89 


SendPortB 


sendBHS 


sendBw 


send01 


send23 


90 


ror.b 
move.b 
subq 
bne 
eir.b 
movern.| 
rs 


movem.l 
lea 
eir.b 
move.b 
andi.b 
cmpi.b 
bne 
moveqg 
ror.b 
ror.b 
move.b 
andı.b 
ori.b 
move.b 
btst 
beq 
ror.b 
move.b 
andi.b 
move.b 
bist 
bne 
subq 
bne 
eIr.b 
movem.l 
ts 


#2,d0 
#$80,(20) 
#1,d1 

readO1 

(a0) 
(a7)+,A0O/D1-D2 


AO/DO-D3,-(A7) 
$400013,A0 
(a0) 

(a0),D2 
#$F,d2 
#$8,d2 
sendBHS 
#2,d1 
#2,d0 
#=2,d0 
d0,d2 
#$S30,d2 
#$40,d2 
d2,(a0) 
#2,54(a0) 
send01 
#2,d0 
d0,d2 
#$90,d2 
d2,(a0) 
#2,$4(a0) 
send23 
#1,d1 
sendBw 
(a0) 
(a7)+,AO/DO-D3 


;L-Takt ausgeben 

‚jetzt 4-7 lesen 

;Schleife zu 1-rmal wiederholen 
‚nicht empfangsbereit 
‚Register wiederherstellen 


‚Register retten 

Port B des 68230 

‚nicht ernpfangsbereit 

Lies den Eingang 

‚nur Bits 0-3 interessieren 
‚empfangsbereit? 

‚nein® 

‚zuerst 0-3, dann 4-7 senden 
‚nchtige Position erzeugen 
‚schieben 


;2 Bits isolieren 
;H-Takt 

‚auf Portlegen 
;Takteingang auf H? 
‚nein 

‚jetzt 2-3senden 


‚Taktausgang aufL 
‚ausgeben 
‚warten, bis Takteingang aufL 


‚4 Paare senden 
‚nicht empfangsbereit 
Register wiederherstellen 
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“ l. Nachtrag zum C'T KAT-Ce Handbuch “ 


” * 


WERT EEE TER TRUE RER 


Fehler im Handbuch: 


S. 2: minimale AD-Wandlerzeit: ca 12 Mikrosek bei 8 MHz. 
Dieser Wert ist nur bei direkter Ansteuerung erreichbar, 
nicht aber durch den Aufruf der entsprechenden Sprungadresse 
S. 22: unten, falsche Schreibweise, korrekt: ORG $1000,#4:PR132.CODE 
S. 32: Sonderbearbeitung ist CHAR 11 
Keypressbearbeitung ist CHAR 12 
Tastaturbearbeitung ist CHAR 13 
S. 53/54: Die Ausnahmevektoren sind nicht korrekt angegeben. 


Ferner fehlt im Schaltplan der Hinweis auf die Leuchtdiode und den dazu- 
gehörigen Widerstand zwischen dem 68000 und den Eproms. Diese Bauteile sind 
in Reihe an GND und +5V geschaltet, um das Vorhandensein der Betriebsspannung 
anzuzeigen. Als Widerstand ist 390 Ohm zu wählen. Die Farbe der Leuchtdiode 
sollte auf jeden Fall mit der Farbe des Lötstopplackes harmonieren. 


Ausnahmevektoren des 68000: 


Im untersten Adrefbereich des 68000 Prozessors befinden sich 

Zeiger, die im Monitorlisting nicht gut dokumentiert sind. 

Da diese Zeiger im RAM liegen, können diese Vektoren selbst 

verändert werden. Lediglich die beiden ersten Vektoren entfallen, 

da nach einem RESET-Impuls zunächst das Eprom in diesem Bereich liegt. 


00: Stackpointer nach RESET 80: Trap #0 (Trace ausschalten) 
04: Startvektor nach RESET 84: Trap #1 (Trace einschalten) 
08: Busfehler (nicht verfügbar) 88: Trap #2 
0C: Adreßfehler 8C: Trap #93 
10: unbekannter Befehl 90: Trap #4 
14: Division durch O 94: Trap #5 
18: CHK-Bef£ehl 98: Trap #6 
20: Privilegierte Verletzung 9C: Trap #7 
24: Trace AO: Trap #8 
28: unbekannter Befehl der Form Axxx A4: Trap #9 
2C: unbekannter Befehl der Form Fxxx AB: Trap #10 
30..5F: reserviert (nicht benutzbar) AC: Trap #11 
60: unechter Interrupt (nicht benutzbar) BO: Trap #12 


B4: Trap #193 

B8: Trap #14 

BC: Trap #15 

Co..FF: reserviert (entfällt) 
ab 100: Monitorprogramm 


64: Auto-Interrupt Level 
68: Auto-Interrupt Level 
6C: Auto-Interrupt Level 
70: Auto-Interrupt Level 
74: Auto-Interrupt Level 
78: Auto-Interrupt Level 
7C: Auto-Interrupt Level 


NN 2ONH 


Wie bereits im Handbuch angesprochen, wird der Inhalt des Eproms von 
Zeit zu Zeit überarbeitet, Fehler beseitigt (neue eingebaut?) sowie 


weitere Routinen implementiert. 
Selbstverständlich können wir auch für neue Programmteile keine 


Funktionsgarantie übernehmen. 


Reelle Zahlen für die C'T KAT-Ce 


Als erste Erweiterung ıst ab Version 1.4 die Verarbeitung reeller Zahlen 
erfolgt. Diese Zahlen werden intern in 2 Longwords (64 Bit) verarbeitet, 
wobei die Genauigkeit der Speicherung 47 Bınaerstellen entspricht. Ausge- 
geben werden jeweils 13 Stellen in Dezrimalschreibweise. Der Rechenbereich 
geh: von 10 hoch -998 bis 10 hoch +998, dürfte also für die wesentlichen 
Anwendungen ausreichen, selbst wenn Sie Ihr GIRO-Konto verwalten wollen. 


Den reellen Zahlen liegt eine duale Exponentialschreibweise in der Form: 
VZ * 1.xxxxxxx.. mal 2 hoch EXP zugrunde. 


Diese Darstellung ist folgendermaßen kodiert: 


l. Longword: Vr*EEEESEEEEEEEENDDDDDIDDDDDDDDD 
2. Longword: DDDDDDIIDDDDDICDDDDDDDDDDDDDDDDD 


Bedeutung: V = Vorzeichen 1: Negativ 0: positiv 
*“ = nicht benutzt: 0 
E = Exponent 
N = Nullhbinweis N=1: Wert ungleich 0; N=0: reelle Zahl 0 
D = 


Binaerwerte hinter dem Komma 


Der dezimale Wert 1.0 ist kodiert als: 10018000_00000000 
Der Exponent hat also die Bit-Kombination xxx1000000000001 


wird die Zweierpotenz größer, 


so wird E£ür jeden Schritt der Exponent 
vergrößert. 


Damit hat die dezimale Zahl 16 die Darstellung: 10058000_0000000 


Die dezimale Zahl -256 wäre demach: 90093000_00000000 (V2-Bit beachten) 


werden die Zahlen kleiner als ]l, so wird der Exponent erniedrigt. 
0.5 (dezimal) ist also: 10008000_00000000 
und -0.0625 (dezimal): BFFD8000_00000000 


Nun kann z.B die Zahl 27 nicht als 2-er Potenz geschrieben werden. In 27 
steckt als höchstmögliche Potenz 2 hoch 4 (16). Damit ist der Exponentialtei 
1005. Jetzt wird der Rest sukzessive durch die Zweierpotenzen geteilt, die 
der Zahl 16 folgen und die oben als 'D' bezeichneten Bits von links nach 
rechts entsprechend dem Divisionergebnis gesetzt oder gelöscht. 

27 durch 16 ist 1 Rest ll. Hier wird der Exponent verarbeitet. 

il durch B ist ] Rest 3: höchstes D-Bit setzen 

3 durch 4 ist 0 Rest 3: D-Bit auf 0 

3 durch 2 ist 1 Rest l: D-Bit setzen 
l durch 1 ist 1 Pest 0: D-Bit setzen 
Da kein Rest bleibt, werden natürlich alle folgenden D-Bits gelöscht. 
Damit ist die Darstellung von dezimal 27: 1005D800_00000000 


wählen wir eine Dezimalzahl: 8.0625 
Exponentialwert: 3 -)> 1004 


8.0625 durch 8 ist 1 Rest 0.625 

0.0625 durch 4 ist O0 Rest 0.0625: D=0 
0.0625 durch 2 ist O0 Rest 0.0625: D=0 
0.0625 durch I ist O0 Rest 0.0625: D=0 
0.0625 durch 0.5 ist 0 Rest 0.0625: D=0 
0.0625 durch 0.25 ist 0 Rest 0.0625: D=0 
0.0625 durch 0.125 ist O0 Rest 0.0625: D=0 
0.0625 durch 0.0625 Rest ist 1 Rest 0: D=l 


alle anderen D-Bits auf O0 setzen. 
also ist 8.0625: 10048100_00000000 
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2 2. Nachtrag zum KAT-Ce Handbuch 2% 
” *“ 
a Eproms KAT-Ce Version 1.5 * 


” * 


WERE EEE EEE EEE HR U 


Zunächst einmal ist uns aufgefallen, daß eine wichtige Monitor- 
anweisung nicht im Handbuch abgedruckt ist, das Setzen von Register- 
inhalten. Es geht folgendermaßen: 


R=D0:1234 oder R=A4:800128 oder r=1:5 usw. 


Anderungen gegenüber 1.4: 


ADIn und DAOut funktionieren 

Die Routinen SerAStat und SerBStat funktionieren 

DS funktioniert auch für Bereiche über 256 Byte 

ADD xx,Ax funktioniert 

Der Chain-Befehl funktioniert auch bei langen Files 

EORI #xx,CCR wird korrekt übersetzt 

BTST #Axx,Dx wird auch für xx > 31 korrekt disassembliert 


Indirekt indizierte Adressierung funktioniert auch mit 
negativem Offset 


Die EQU Anweisung funktioniert auch dann, wenn vor dem 
Programmbeginn eine Konstante der Länge WORD definiert 
wird, deren Wert sich auf eine Speicherstelle bezieht, 
die hinter dem Programm steht. 


Neu: 
Die KAT-Ce erkennt ihre Systemfrequenz. Da hierzu der 
68681 benutzt wird, muß dieser Baustein vorhanden sein, 
auch wenn die parallele Anschlußart angewendet wird. 
Die Frequenz wird auf 1000 Herz genau angegeben, wobei 
eine Abweichung von +/- 2000 Hz möglich ist. Für eigene 
Verwendung steht die Frequenz an der Adresse $J3CC..sICF 
als Longword. 


Der gesamte Monitor wurde auf relative Adressierung geändert, 
weil damlt leichter Spezialanpassungen möglich sind. Daher 
sehen die einzelnen Routinen anders als im Handbuchlisting 
aus (aus MOVEA.L #Adresse,AD wurde z.B. LEA Adresse(PC),A0 ), 
die Logik sowie die Reihenfolge der Monitorprogramm- 

teile ist allerdings lm wesentlichen unverändert. 


Die KAT-Ce findet auch größere Ram-Konfigurationen, die 

ab $000000 bis $JIFFFFF eingesetzt werden können (z.B durch 
externe Erweiterungen oder 4 weitere IC's 43256, die bei 
entsprechender Dekodierung auf die bisherigen RAM's aufgelötet 
werden können. 


Der Ausnahmevektor bei $3C wird von der KAT-Ce nicht benötigt, 

er wurde für eine Sonderaufgabe vorgesehen. Wenn das dort ste- 

hende Longword von FFFFFFFF verschieden ist, wird das Programm ausge- 
führt, auE welches der Speicherinhalt zeigt. Falls das höchste Bit ge- 
setzt ist, wird das Programm sofort ausgeführt, nachdem die Vektortabelle 
von $800000 nach $0 kopiert wurde, ist das höchste Bit nicht gesetzt, 

wo beginnt die Ausführung nach der Aufnahme der Verbindung zum Host- 
rechner. Das Programm wird als Unterprogramm aufgerufen, es ist 

also möglich, später in den normalen Betrieb überzugehen, wenn die 
Routine durch RTS abgeschlossen wird. 


Im Hauptmenue wird die Option P(ascal angegeben, die allerdings 

nur dann ausgeführt wird, wenn ab $809008 ein Compiler zu finden ist. 
überprüft wird, ob das erste Wort ist $808008: 6000 (Branch Long). 
Sollten Sie einen eigenen Compiler haben, lassen Sie es uns nur 
wissen, ansonsten kann dort der KAT-Ce PASCAL-Compiler untergebracht 
werden. 


Aus ebendiesem Grund ist der Ausgang des Editors geändert, es kann 
nur noch von dem Hauptmenue aus assembliert werden. 


Dafür gibt es etwas neues. Sie können den Editor über $8001D0 
(besser mit: MOVE #$34,-(A7) TRAP #4 siehe unten) aufrufen!. 
AO muß einen Zeiger auf den Speicherbereich enthalten, ab dem 
editiert werden kann, DO die Länge des Speicherbereiches. Wenn 
Ihnen jetzt die Idee kommt, damit ist es denkbar, von PASCAL aus 
den Editor als Prozedur aufzurufen, so liegen Sie völlig richtig. 


Wo wir schon von PASCAL schreiben. Für ein Multitasking (bei uns 
wird es ein sehr einfaches sein) wäre eine interruptgesteuerte 
Unterbrechung sinnvoll. Haben wir schon eingebaut: MOVE #$35,-(A7) 
und TRAP #4 starten uJer stoppen diesen Interrupt. In DO steht 
die Anzahl der Millisekunden, die zwischen 2 Interruptimpulsen 
vergehen soll, also Taktzeit 10 Millisekunden: MOVEQ #10,D0. 
Soll der Interrupt gesperrt werden, so löschen Sie DO vor dem 
Systemtrap. Das Register AO sollte die Adresse der Interrupt- 
routine beinhalten, wo Sie den Interrupt abarbeiten wollen. 
Beachten Sie, daß der Befehl: MOVE.B #1,$%400035 dort 
vorkommt, damit der Interrupt beendet werden kann. Daß eine 
Interruptroutine mit RTE abzuschließen ist, wissen Sie ja wohl 
sowieso. 

Wollen Sie keine eigene Interruptroutine schreiben, so löschen 
Sie das A0-Register vor Aufruf der Routine. In diesem Fall wird 
unsere eingebaute lnterruptroutine ausgewählt. Diese löscht 
zunächst die Speicherstelle $42C, bei jedem Interrupt wird sie 
hochgezählt. 

Soll der Interrupt in kritischen Situationen gesperrt werden, 
so verwenden Sie den Befehl ORI #$0700,5R 
Sobald wieder interruptiert werden darf, folgt: ANDI #$F8FF,SR 


Damit der Interrupt überhaupt vom 68230 an die CPU weitergeleitet 
wrid, muß unbedingt auf Position 3 des Interruptjumperfeldes 
eine Brücke gesetzt werden! 


An der Speicherstelle $3DO steht ein Zufallswert (Long), welcher durch 
die Kommunikationsroutinen mit dem Hostrechner verändert wird. 


Während eines Trace-Laufes kann durch Drücken der '?' Taste der 
Monitor aufgerufen werden. Sie sollten unbedingt nur Speicherstellen 
ansehen oder verändern, keinesfalls aber Routinen neu starten! 


Die Systemroutinen (z.B Keypress, Byteout usw) sind nun über TRAP #4 
erreichbar, wobei vor Gem Trapaufruf die Nummer der gewünschten Ope- 
ration auf den Stack gegeben werden muß. Dabei leiten sich diese 
Nummern direkt aus der Reihenfolge in der unverändert existierenden 
Sprungtabelle ab $800100 ab. Die Register werden nur noch in den ange- 
gebenen Fällen verändert. Nach dem Trap #4 Aufruf wird normal weiter- 
gearbeitet. Sollte das Tracen eingestellt sein. so werden die Monitor- 
routinen 'im verborgenen! ausgeführt, anschließend wird weitergetraced. 
Wenn Sie wollen, daß Ihre Routinen später auch auf Nachf£folgern der 
KAT-Ce oder anderen Systemen, auf die wir (vielleicht) unsere 

Software implementieren, laufen sollen, so sollten Sie ab sofort 

nur noch mit TRAP #4 arbeiten! 


$00: SetResetAdr ;ResetAdresse in AO nach RESET setzen 


$0l: Prelnit ;Kaltstart 

$02: MonInit ;Monitor als Unterprogram aufrufen, alle Register ver. 

*03: Quit ;Ende der Verbindung zum Hostrechner 

$04: Keypress ;DO ist 1, wenn Zeichen anliegt 

$05: ByteIn ;Zeichen in DO 

$06: TastIn ;Zeichen in DO 

$07: GetString ;Al zeigt auf String, Länge in (Al) 

$08: ByteOut ;DO ausgeben 

$09: AsciOut ;DO als Text ausgeben 

$SOA: WordOut ;DO als Wort ausgeben 

$0B: PrtByt ;D1l hex ausgeben 

s0C: PrtWord ;Di asl Hexwort ausgeben 

$0D: StroOut ‚String in (Al) ausgeben, Al ver. 

$DOE: CROut :Zeilenrücklauf und Vorschub erzeugen, DO ver. 

soF: ClBild ;Bild löschen, DO ver. 

$10: PrtCol ;Doppelpunkt ausgeben, DO ver. 

$11l: PrtMSpc ;tDi)+1l Leerzeichen ausgeben, DO-DI ver. 

s12: GotoXY ;D1.W enthält im Lowbyte x, im Highbyte y-Koord. 

$13: Bell ;Piep ausgeben, DO ver. 

$14: DisZeile ‚Adresse in Al, nachher in Al neue Adresse, 
;A0-AA4/DO-D4 ver. 

$15: ResetFile ;AA zeigt auf Namenstring, DI Filenummer 

$16: RewriterFile ‚Al zeigt auf Namenstring, D1 Filenummer 

$17: BlockRead ;Filenummer in D1, Blocknummer in D5 

s18: BlockWrite ;Filenummer in Dil, Blocknummer in D5 

$19: CloseFile ;Filenumner in DI 

$lA: CloseDeleteFile ;Filenummer in D1l 

$1B: IOResult ‚Ergebnis in DO 

$1C: UnitOut ;DO auf Hostdrucker ausgeben 

$1D: UnitInit ;Hostdrucker initialisieren 

$1E: DAOut ;DO mit ZN 428 ausgeben 

$IF: ADIn ;2N 427 in DO einlesen 

$20: ParAlnit ;‚Centronicsschnlttstelle inltialisieren 

521: ParAStat ;Status nach DO einlesen 

$22: ParAOut ;DO an Drucker ausgeben 


$23: ParAIn ee 

$24: ParBInit 3=77 

325: ParBStat  n- 

$26: ParBOut -e-s- 

$27: ParBIn == 

$28: SerAlnit ;Init Seriell Port A (kleine Schnittstelle) 
;D1l enthält Baudratendefintion 
‚immer 8 Bit, 1 Stoppbit, keine Parität 


$29: SerAStat ;Bit 0 von DO gesetzt, wenn sendebereit 
‚Bit 1 von DO gesetzt, wenn Byte angekommen 

$2A: SerAOut ;DO ausgeben 

$2B: SerAln ;DO einlesen 

$2C: SerBInit ;Init Seriell Port B (große Schnittstelle) 


;Di enthält Baudratendefintion 

‚immer 8 Bit, 'T Stoppbit, keine Parität 
$2D: SerBStat ‚Bit 0 von DO setzt, wenn sendebereit 

;Bit 1 vor. DO ges-tri, wenn Byte angekommen 


$2E: SerBOut ;DO ausgeben 


$2F: SerBIn ;DO einlesen 
$30: InitPortB ;parallele Schnittstelle zum Hostrechner init. 
$31: ReadPortB ;DO lesen 
$32: SendPortB ;DO ausgeben 
$33: Real ;D7 enthält Art der Real-Operation 
Neu: $34: Editor ;A0O zeigt auf Startadresse des Speicherbereiches, 


;in dem editiert werden darf, DO enthält die 
;Länge des reservierten Speicherplatzes. 
;Alle Register können verändert sein! 


335: Interrupt ;DO = 0 schaltet Interrupt ab 

;DO <>) O0 gibt an, wieviel Millisek. Taktzeit 
;$s42C zählt im Interrupttakt hoch 
;£falls AO = 0, wird die interne Interruptroutine 
;gewählt, ist AO <> 0, so wird die in AO stehende 
;Adresse in die Interruptvektortabelle bei $68 
;seingetragen 

Trap #4 - Beispiel: 


lea string,Al 
move #$0D,-(A7) ;Anwählen von STROUT 
trap #4 
rts 
String str "String durch TRAP #4 ausgegeben' 


Selbstverständlich Ist es nicht möglich, das Handbuch immer dann neu 
zu drucken, wenn eine bessere (?) Epromversion zur Verfügung steht. 
Aus diesem Grund bieten wir den aktuellen Monitor-Source-Text (also in 
demselben Umfang wie im Handbuch beschrieben, ohne Disassembler, Real, 
Editor, Assembler) auf folgenden Diskettenformaten an: 


APPLE II Prodos (143k-Laufwerke), ATARI ST, IBM PC, Gepard (3 1/2 Zoll). 


Ansonsten können wir ein Listing ausdrucken. 
Der Preis für das Listing oder die Diskette beträgt jeweils 40 DM. 


Läßt sich eine Zahl nicht als Summe von Zweierpotenzen schreiben, a 
so tritt in der REAL-Darstellung eine Periode auf, ein Beisp. entfäl 


Demonstration einer Umwandlung REAL in Dezimal: 
10009340_80000000 
Es fällt zunächst auf, daß die Zahl positiv ist. 
Die Zweierpotenz ist i2, also Grundwert 4096. 
Die Bitfolge der D-Bits ist: x001.0011.0100.0000 1000.0000. 
Das erste wertsteigernde Bit ist das 3., also wird 2 hoch Fu addiert usw. 
Ergebnis: 2*12 + 2*°9 + 276 + 2°5 + 2°3 + 2° -4 
4096 + 512 +64 + 932 +8 + 0.0625 
4712.0625 (dezimal) 


Aufruf der Operationen für reelle Zahlen: 


Die Real-Operationen sind über eine neue Sprungadresse erreichbar: 
s8001CC (siehe dazu vergleichbare Sprünge auf 5. 17 des Handbuches). 

Die gewünschte Operation wird durch den Inhalt des Datenregisters D7 
ausgewählt. Nach der Operation gibt der Inhalt von D7 eine Fehlermeldung, 
sofern D7 von O0 verschieden ist (Ausnahme: Vergleiche). 

Die Realwerte werden in den Registerpaaren DO_D1 bzw. D2_DI übergeben, 
bei Stringoperationen zeigt Al auf den String. Außer DO_DI und D7 werden 
keine Register verändert. 


Liste der durch D7 erreichbaren Operationen: 


Stringoperationen: 


0: Umwandlung String zu Real String in (Al), Real in DO_DI 
im Highword von D7 steht, wieweit diese 
Routine den String abgearbeitet hat. 
l: Umwandlung Real zu String DO_DIl -> (Al) Exponentialformat 
D2 = minimale Länge des Strings, vorne werden 
gegebenenfalls Leerzeichen eingefügt 
D3 = Nachkommastellen 


2: Umwandlung Real zu String DO_D1 -> (Al) Festkommaformat, D2, D3 wie oben 
3: Umwandlung Real zu String DO_DI -> (Al) Ingenieur-Format, D2,. DI wie oben 
4: Umwandlung Real zu String DO_DI -> (Al) Gleitkommaformat, D2, D3 wie oben 
Vergleiche: 

5: gleich D0O_D1I = D2_D3 Vergleiche: D7 = ], wenn wahr 

6: ungleich DO_D1 <> D2_DI D?7 = 0, wenn falsch 
7: kleiner oder gleich DO_D1 <= D2_D3 

8: kleiner DO_DI < D2_D3 

9: groesser oder gleich DO_D1 >= D2_D3 

lO:groesser DO_D1I > D2_D3 


ll: Vorzeichen kippen DO_D1 -> DO_DI1 


12: Multiplizieren D0O_DI * D2_D3 -> DO_DI 
13: Dividieren D0O_D1 / D2_D3 -> DO_DI 
14: Addieren D0_DI + D2_D3 -> DO_DL 
15: Subtrahieren D0O_D1 - D2_D3 -> DO_DI 
16: Quadrieren DO_DI * DO_DI -> DO_DI 
17: Kehrwert bilden 1 / (DO_DI) -> DO_DI 


Real-Integer Umrechnungen: 


18: Real zu Longinteger DO_DIl -) DO 
19: Longinteger zu Real DO -> DO_D1 


Transzendente Funktionen: 


20: Sinus sin (D0_D1l) -> D0_DI 
21: Cosinus cos (D0O_DY) -) DO_DI 
22: Tangens tan (D0_D1) -> DO_DI 
23: Arcustangens arctan (D0_D1) -> DO_DI 
24: Arcussinus arcesin (DO_DI) -) DO_DI 
25: Arcuscosınus arccos (DO_DI) -> DO_D!I 
26: Wurzel ziehen SORT (D0O_D!) -) DO_DI 
27: Zweierpotenz 2 hoch (DO_D1I) -> DO_DI 
28: Exponential e hoch (D0_D1) -> DO_DI 


29: Zehnerpotenz 10 hoch (DO_D1) -> DO_DI 
30: Potenz (D0_D1) hoch (D2_D3) -> DO_DI 


31: Zweierlog. lb (DO_DI) -> DO_DI 

32: nat. Log. In (DO_DI) -> DO_DI 

33: Zehnerlog. log(D0_D1) -> DO_DI 
Sonstiges: 

34: Pı-Erzeugen Pi -> DO_DI 

35: Fakultaet (DO_D1I)! -> DO_DI 


36: Gauss-Klammer von DO_D1 (Nachkommastellen abschneiden) 
37: Vorkommastellen von DO_D1 beseitigen 
Fehler in D7 : D7 =0, wenn kein Fehler 
0 gesetzt, wenn Veberlauf erzeugt 
l gesetzt, wenn Division durch O 
Bit 2 gesetzt, wenn Wurzel oder Log. aus neg Zahl 
3 gesetzt, wenn ArcSin nicht im Berelch -1..+1 liegt 
4 gesetzt, wenn Syntaxfehler bei String zu Real 
5 gesetzt, wenn unbekannte Real-Operation 


Bit 
Bit 


Beispiel für eine Realrechnung: 


Getstring equ $80011C 


Piep equ SBO0O14C 
Real equ S$SEDOICC 
Stringout equ $800134 
start lea string, Al 
jsr Getstring 
moveq #20,D7 ‚String zu Real 
jsr Real 
moveg #32,D7 ‚nat. Logar. 
Jsr real 
tst D7 ‚Fehler? 
bne Eehler ‚3a 
lea string, Al 
moveg #1,D7 ;Real zu String 
jsr Real 
jsr Stringout 
rts 
fehler jmp Piep 


string ds 40 


